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LISTING 



WC «5 0#:V. PAi,f ' 



<M I.O ABSTRACT 

96 

97 THE OHVll J IS A GENERAL PURPOSE PARALLEL INTERFACE FOR TMF 

96 LSI -11 BUS. IT HAS A BASIC CONTIGURATION Of 64 TRI STATE IN/0<jT 

99 LINES DIVIDED INTO FOUR GROUPS OR PORTS OF 16 BIT JORDS. 
100 

101 THERE ARE TWO 4K DIAGNOSTICS FOR THE DRVll J OPTION. 

102 THE DRVll J DIAGNOSTIC TEST PART 1 CF ? CONTAINS A 

105 SERIES OF TESTS WITHOUT DRVllJ INTtRRUPTS DESIGNED TO TEST ALL 

104 LOGIC FUNCTIONS AND DATA PATHS MADE ACCESSIBLE WITH THE LOOPBAC*' 

105 CABLE INSERTED INTO THE DRVll J I/U CONNECTORS. 
106 

107 THE DRVll -J DIAGNOSTIC PART 2 OF 2 IS A SERIES OF TESTS 

106 WITH DRVllJ INTERRUPTS DESIGNED TO TEST ALL LOGIC AND DATA PmTHS 
109 HADE ACCESSIBLE WITH THE LOQPBACK CABLE INSERTED INTO THE I/C 
no CONNECTORS. 

Ill 

112 THE DRVll J IS CONTAINED ON A DOUBLE HEIGHT MODULE. 

115 THE MODULE CONTAINS TWO 50 PIN CONNECTORS FOR INTERFACING 
114 TO EXTERNAL USER DEVICES. 

115 

116 FOR DIAGNOSTIC TESTING. THE DRVll -J CABLECBCOSW 02) MUST 

117 BE INSTALLED WITH 1/2 TWIST BETWEEN THE 50 PIN CONNECTORS. 
116 

119 

120 • mGPA * 

121 ♦ NOTE: THIS DIAGNOSTIC HAS BEEN MODIFIED TO RUN IN KXTll (S8C 11/21) • 

122 ♦ BASED SYSTEMS. THE PROGRAM WILL AUTOMATICALLY ADJUST ITSELF TO RUN • 
125 • IN THE APPROPRIATE ENVlROMiENT AS FOLLOWS: • 

124 * * 

125 • LSI 11» 11/2. AND 11/23 SBC 11/21 • 

126 • ... « 

127 « CSR RANGE: 160010 TO 177760 174000 TO 177760 • 
126 • PROGRAMMABLE ... • 
129 ♦ ...VECTOR RANGE: 0000 TO 1774 000 TO 374 ♦ 
150 • ;:GPA « 
151 

132 
155 

154 2.0 REQUIREMENTS 



157 2.1 EQUIPMENT 

156 

159 1. PDPl 1/03, 11/23 COMPUTER OR LSI 11 PROCESSOR 

140 WITH A MINIMUM OF 4K MEMORY. 

141 

142 2. SERIAL LINE INTERFACE AND CONSOLE TERMINAL 

145 

144 3. DRVll -J OPTION WITH A BC05W 02 CABLE 

145 

146 2.2 STORAGE 

147 

146 THE PROGRAM USES THE LOWER 4K OF MEMORr. 

149 

150 5.0 LOADING PROCEDURE 
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SF'^ 0004 



151 
15^ 
155 
154 
155 
156 
157 
158 
159 
160 
161 
162 
16S 
164 
165 
166 
167 
16a 
169 
170 
171 
172 
17S 
174 
175 
176 
177 
179 
179 
160 

lai 

162 
16S 
164 

165 
186 
187 
188 
189 
190 
191 
192 
19S 
194 
195 
196 
197 
1^8 
199 
200 
201 
202 
20S 
204 
205 
206 
207 



4.0 



5.0 
5.1 



USE STANDARD PROCEDURE CQR POP 11 ABSOLJTf 
BINARr FORMAT TED PAPERTAPES OR XXDP MEDI4 
(FILES UITM .BIC OR .BIN EXTENSIONS ONLf). 



STARTING PROCEDURE 



1. MAKE SURE THE DRVll J CABLE IS INSERTED UITH 1/2 A TUIS^ 
ON THE I/O CONNECTORS Of THE DRVll -J OPTION. 

THIS WILL CONNECT PORT A TO PORT C AND PORT B TO PORi 0. 

2. HAKE SURE THE DEVICE BUS ADDRESSES AGREE UITH THE DEFAIXT 
VALUES DEFINED IN SECTION 7.1. IF NOT. CHANGE 
LOCATION(S) AS DESIRED VIA THE 'ADDRESS/' ODT COMMAND. 

3. THE PROGRAM SHOULD ALWAYS BE STARTED AT 200. STARTING 
AT 200(200G OR .R CVORCC UNDER XXDP* ). THE PROGRAM 
INITIALIZES ITSELF. PRINTS ITS IDCFIRST TIME ONLY) AND 
THEN PRINTS THAT THE ORVll-J CABLE IS REQUIREOC FIRST TIME 
ONLY) AND THEN PRINTS: SUR-XXXXXX NEU- 

UHERE XXXXXX REPRESENTS THE CURRENT VALUE OF THE SOFTWARE 
SWITCH REGISTER. IF NO CHANGES ARE REQUIRED IN THE SWITCH 
REGISTER THEN JUST HIT CARRIAGE RETURN. 
IF CHANGES ARE REQUIRED. THEN A NEW VALUE MAY BE TYPED 
FXLOUED BY A CARRIAGE RETURN. 

REFER TO SECTION 5.0 FOR SWITCH REGISTER OPTIONS. 

4. IF THE FOLLOWING ERROR OCCURS PIGHT AFTER STARTUP IT IS 
POSSIBLE THAT THE ORVllJ LOOPBACK CABLE MAY NOT BE INSTALLED 
OR WAS NOT INSTALLED PROPERLY: 

REG READ/WRITE ER 

ERRPC TSTNUM BUSADR EXPCT RCVD 
002224 000002 ^164160 100700 000700 

*BUSADR MAY BE DIFFERENT DEPENDING ON THE CSR OF THE ORVllJ. 
SOFTWARE SWITCH REGISTER 



OPTIONS 

THE PROGRAM SWITCH DEFAULT MODE IS SWR - 000000 
IF USING A VIDEO TERMINAL .BIT 15 • KHALT ON ERROR) 
MAY BE HELPFUL IN KEEPING THE ERROR ON THE SCREEN. 



SWITCH 

SU15-1 
SW14-1 
SW13-1 
SWll-1 
SU09-1 
SW08>1 



OCTAL 

100000 
040000 
020000 
004000 
001000 
0004XX 



FUNCTION 



HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TyPEOuTS 

INHIBIT ITERATIONS 

LOOP ON ERROR 

LOOP ON TEST IN SWR <7 0> 
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206 


5.2 CONTROL 


20^ 






210 


1. 


THE SOFTWARE SWITCH REGISTER SWREG* ClOC. 176) CAN GE 


211 




CHANGED BY USING THE OOT TACILITIES. 


212 






213 


2. 


THE SOFTWARE SWITCH REGISTER CAN BE CHANGED UNDER PROGRAM 


214 




CONTROL BY TYPING THE 'CONTROL £ G' KEYS. THIS 


215 




KEYBOARD OPERATION WILL PRINT OUT THE CURRENT CONTENDS 


216 




AND ACCEPT NEW OCTAL SWITCH REGISTER DATA TERMINATED 


217 




WITH A CARRIAGE RETURN. 


218 






219 


5. 


ONCE THE ODT MODE HAS BEEN ENTERED BECAUSE Of AN 


220 




ERROR CONDITION WITH BIT15 SET (HALT ON ERROR). STEP ^2 


221 




ABOVE IS or NO VALUE, SO RESORT TO STEP 01 TO ALTER THE 


£22 




SOFTWARE SWITCH REGISTER IF DESIRED BEFORE TYPING 


2?3 




P (CONTINUE), 


224 
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2?6 

22' 
220 

22^ 
250 
231 
2«2 

:55 

234 

255 
256 
257 
256 
259 
240 
241 
242 
243 
244 
245 
246 
24 7 
246 
249 
250 
251 
252 
255 
254 
255 
256 
257 
258 
259 
260 
261 
262 
265 
264 
2f5 
266 
267 
266 
269 
270 



6.0 



6.1 



6.2.1 



6.2.2 



ERROR REPORTING 
ERROR COMMENT 

ALL ERRORS ARE ACCOt*>ANIED UITH AN ENGLISH LANGUAGE DESCRIPTIVE 
COMMENT AS TO THE TYPE Or FAILURE . FURTHER QUALiriCATION Of 
THE ERROR CAN BE OBTAINED IF NEEOEO FROM THE COMMENT AT THE 
ERROR PC OR FROM THE TEST ITSELF. 

TO CONSERVE MEMORY SPACE FOR THE 4K PROGRAM MEMORY 
REQUIREMENT. REGIS1ER 5 (RS) IS RESERVED FOR THE 
iBOOAT LOCATION (1126). 

EXAMPLE: CMP tGOOAT.CRS) IS THE SAME AS CMP IGODAT. tBOOAT. 

ERROR DATA 

ERROR TITLE HEADING 

ERRPC TSTNUn BUSADR EXPCT RCVD 

xxxxxx xxxxxx xxxxxx xxxxxx xxxxxx 



ERRPC 

TSTNUM 

BUSADR 

EXPCT 

RCVO 



LISTING ADDRESS UHERE THE ERROR UAS DETECTED 
TEST NUMBER WHERE THE ERROR OCCURRED 
DRVllJ BUS REG ADDRESS OF CONCERNED OPERATION 
DATA THAT UAS EXPECTED 
DATA THAT UAS RECEIVED 



ERROR TITLES 
REG TIMEOUT ER 
REG READ/URITE ER 
IRR REG ER 
ACR REG ER 
IMR REG ER 
ISR REG ER 
CHIP STAT ER 



REGISTER TIMEOUT ERROR 
REGISTER READ/WRITE ERROR 
INTERRUPT REQUEST REGISTER ERROR 
AUTOCLEAR REGISTER ERROR 
INTERRUPT MASK REGISTER ERROR 
INTERRUPT SERVICE REGISTER ERROR 
CHIP STATUS ERROR 
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272 
2'5 
274 
275 
276 
277 
278 
J 79 
280 
281 
282 
285 
284 
285 
286 
287 
288 
289 
290 
291 
292 
295 
294 
295 
296 
297 
298 
299 

soo 

501 
502 
505 
504 
505 
506 
507 
508 
509 
510 
511 
512 
515 
514 
515 
516 
517 
518 



•.0 

;.i 

7.2 
7.5 

7.4 



7.5 
8.0 



miscellaneo-js 

ORVII J BOS ADDRESS MQOiriCATION 

MODIFY LOCATION $BASE fAODR: 1^44) If BASE BUS ADDRESS 
IS NOT 164160. 

XXDP/APT NOTES 

THIS PIAGNOSTIC DOES SUPPORT ACT AND APT ENVIRONMENTS. 
POUER FAIL 

A POUER FAILURE WILL CAUSE A RESTART MESSAGE ON POUER UP AT 
UHICH TIME THE PROGRAM IS RESTARTED (ONLY ON SYSTEMS UlTM 
NON-VOLATILE MEMORY AND UITH APPROPRIATE HAROUARE). 

MULTIPLE ORVllJ INTERFACE TESTING 

THIS PROC-RAM DOES NOT "AUTO-SIZE" THE NUMBER OF DRVllJ S CONNECTED. 

THIS DIAGNOSTIC WILL TEST SEQUENTIALLY UP TO 4 DRVllJ INTERFACES 

UITH CONTIGUOUS BUS ADDRESSES. THIS IS ACCOMPLISHED 

BY THE USER SETTING UP LOCATION 'DEVM- (ADDR: 1246) 

UITH A BIT MAP INDICATING UHAT INTERFACES ARE TO BE TESTED. 

I.E. BITO - I SAYS TEST 1ST DRVllJ. 

BITl • 1 SAYS TEST 2N0 DRVllJ 

BIT2 - 1 SAYS TEST 5RD DRVllJ 

BITS - 1 SAYS TEST 4TH DRVllJ 



1ST UNIT 
2ND UNIT 
SRD UNIT 
4TM UNIT 



STARTING CSRA 
STARTING CSRA 
STARTING CSRA 
STARTING CSRA 



164160 »DEVM « 1 

164140 IDEVM - 3 

164120 lOEVM • 7 

164100 $OEVM - 17 



RESTRICTIONS 



EXECUTION TIME 



EXECUTION TIME RANGES FROM ABOUT <5 SEC0»tf)S ON FIRST 
PASS UITH NO ITERATIONS TO <20 SECONDS UITH ITERATIONS 
ENABLED AFTER FIRST PASS. PER ORVllJ UNIT CONNECTED. 
AN "END PASS" MESSAGE INDICATES ALL TESTS HAVE COMPLETED 
ON ALL SELECTED UNITS. 
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320 

S21 9.0 PROGRAn TEST DESCRIPTIONS 

322 - 

323 

324 GENERAL 
325 

326 THIS DIAGNOSTIC CONTAINS A SERIES OF INDEPENDENT TESTS DESIGNED 

527 TO TEST LOGIC FUNCTIONS AND DATA PATHS OF THE DRVllJ OPTION. 

528 TESTING IS ACCOMPLISHED UITH THE AID OF THE 

529 ORVllJ LOOP BACK CABLE PROVIDED FOR DIAGNOSTIC TESTING. 

330 A COMPLETE LIST OF TESTS IS AVAILABLE IN THE TABLE OF CONTENT ^ 

331 AT THE BEGINNING OF THE LISTING. THE COMMENT FIELD UITHIN 

332 EACH TEST CAN BE BENEFICIAL IN TEST UNDERSTANDING. 
335 

334 TESTING WITH THE DRVllJ CABLE ALLOUS FOR TESTING 

535 OF PORT A WITH PORT C AND THE TESTING OF PORT B 

336 WITH PORT D. 
337 

336 9.1 TESTS Tl T22 REGISTER CHECKING 
339 

340 THESE TESTS WILL WRITE/READ PORTS A TO C 

341 AND WRITE/READ PORTS B TO D WITH FLOATING 

342 ONES AND FLOATING ZEROS . GROWING ONES AND 

343 GROWING ZEROS AND DATA PATTERNS. 

344 TESTS ARE PERFORMED TO INSURE INTERACTION WITH 

345 CONNECTED PORTS AND NO INTERACTION BETWEEN 
546 UNCONNECTED PORTS. 

347 
346 

349 9.2 T22.T42 INTERRUPT CONTROL REGISTER CHECKING 
350 

351 TESTS ARE MADE TO THE INTERRUPT CONTROL CHIP 

352 REGISTERS IRR.ACR.IMR AND LIMITED TESTING OF 

353 ISR REGISTER UNTIL INTERRUPTS ARE PERFORMED. 

354 TESTS ARE PERFORMED ON THE REGISTERS WITH 

355 FLOATING ONES. FLOATING ZEROS. GROWING ONES 

356 AND GROWING ZEROS. CHIP RESET CAPABILITIES 

357 ARE TESTED AS WELL AS UNIQUENESS OF REGISTERS 
356 WITHIN A CHIP GROUP AND THE UNIQUENESS OF 

359 ONE GROUP'S REGISTERS TO ANOTHER GROUP'S 

360 REGISTERS. 
361 

362 9.3 TEST 43 • TEST STATUS BITS GINT.S2.S1 .S0.GPL.GP2 
563 

364 EXERCISE THE STATUS BITS S2.S1,S0 AND GINT FOR 

365 EACH GROUP CHIP BY SETTING SINGLE IRR BITS TO CAUSE THE 

366 STATUS BITS TO GO FROM 120 TO 127. EACH IRR BIT 

367 IS THEN MASKED TO RETURN STATUS BACK TO ORIGINAL 

368 STATUS WITH NO IRR BITS SET. 
369 

370 9.4 T44-T47 POLLED MODE TESTING 
371 

372 THIS TEST WILL WRITE PATTERNS INTO OBRA WITH 

373 EITHER LOW TO HIGH OR HIGH TO LOW POLARITIES. 

374 AFTER PLACING ALL ONES IN DBRA AND THEN SELECTING 

375 ACTIVE LOW, CLEARING DBRA WILL NOW SET IRR BITS 

376 0 7. GROUP 1 AND IRR BITSO ^.GR0UP2. 
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577 
57« 
379 
S60 
361 
562 
593 
584 
385 
366 
367 
366 
369 
390 
391 
392 
393 
394 
395 
396 
397 
396 
399 
400 



9.5 



10.0 
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TH£ RPLT SIGNALS WILL SET IRR BITS 4 7 

WHEN URITING OBRA IN OUTPUT MODE. THIS UILL 

SET THE RPLY FOR OBRC .( IRR6 . GROUP 2) 

WHEN HEADING OBRC IN INPUT MODE MILL SET 

IHE RPLt FOR DBRA.CIRR BIT 4. GROUP 2) 

WHEN WRITING OBRB IN OUTPUT MODE. THIS UiLL 

SET THE RPLt FOR OBROCIRR BIT7.GR0UP2) 

WHEN READING 06RD IN INPUT MODE. THIS UiLL 

SET THE RPLY FOR DBRBCIRR BIT5. GROUP 2). 

TEST ALL DATA PATTERNS TO SET IRR BITS 

GROUP 1 AND GR0UP2 AND FOR THE SETTING OF RPLt 

BITS IN THE GROUP 2 IRR REGISTER 6T WRITING IN 

OUTPUT MODE AND READING IN INPUT MODE. 

TEST THAT NO RPLT BITS SET WHEN READING IN OUTPJT 

MODE AND WHEN WRITING IN INPUT MODE. 

T50-T51 CSR'S WITH RESET 
SET UP CSR'S IN OUTPUT MODE AND CLEAR 
DIRECTION BIT OUT OF EACH CSR EXCEPT FOR 
CSRA WHICH WILL CLEAR DIR BIT AND I/E BIT. 

LISTING 
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SEQ 0010 



412 
415 
414 



415 
416 
417 
418 
419 
420 
421 
422 



425 



000001 
160000 



165400 
000001 



001100 
104000 
000004 

000011 
000012 
000015 
000200 
177776 
177776 
177774 
177772 
177570 
177570 

000000 
000001 
000002 
000005 
000004 
000005 
000006 
000007 
000006 



••GPA .HEADER t/CVDRCA DRVllJ DIAG TST PR^l/ , 1979. t /BILL -CAVEr/ 

tJRS .HEADER t/CVORCB DRVllJ DIAG TST PRTl/. 1979. »/BlLL HEAVEr/ 

TITLE CVDRCC DRVllJ DIAG TST PRTl 

•COPYRIGHT iC) 1979 

•DIGITAL EQUIPMENT CORP. 

*MAYNAR0. MASS. 01754 

* 

•PROGRAM BY BILL HEAVEY 
« 

•THIS PROGRAM WAS ASSEMBLED USING THE PDP 11 MAINDEC SVSMAC 

•PACKAGE (MAINDbC-ll 0ZQAC-C7). JUL. 1962. 

* 

TN-1 

SUR«160000 ::HALT ON ERROR, LOOP ON TEST. INHIBIT ERROR TyPOUT 

• EDITED TO PERMIT DRV'S TO RUN ON FALCON CKXTll). i {CPA 

• G. PASQUANTONIO. JULY '81 i (CPA 
* 

• REVISED TO COMPENSATE FOR LONG CABLES £ FILTERS :|JRS 

• J. SUTTON. JULY '85 j;jRS 
SUR> 165400 

TN«1 

SBTTL OPERATIONAL SWITCH SETTINGS 



SWITCH 

15 
14 
15 
11 
9 
8 



USE 



HALT ON ERROR 

LOOP ON TEST 

INHIBIT ERROR TYPEOU^^ 

INHIBIT ITERATIONS 

LOOP ON ERROR 

LOOP ON TEST IN SWR<7:0> 



SBTTL BASIC DEFINITIONS 
•INITIAL ADDRESS OF THE STACK POINTER ••* 1100 •*• 
STACK- 1100 

ERROR* EMT ; (BASIC DEFINITION OF ERROR CALL 

SCOPE- lOT i {BASIC DEFINITION OF SCOPE CALL 

{•MISCELLANEOUS DEFINITIONS 



HT« 
LF- 
CR- 
CRLF. 
PS- 
PSU> 
STKLMT" 
PIRQ" 
DSUR- 
DOISP> 



11 
12 
15 
200 
177776 
PS 

177774 
177772 
177570 
177570 



{•GENERAL PURPOSE REGISTER DEFINITIONS 



{{CODE FOR HORIZONTAL TAB 
{{CODE FOR LINE FEED 
{(CODE FOR CARRIAGE RETURN 
{{CODE FOR CARRIAGE RE TURN -LINE FEED 
((PROCESSOR STATUS WORD 

{(STACK LIMIT REGISTER 
({PROGRAM INTERRUPT REQUEST REGISTER 
({HARDWARE SWITCH REGISTER 
((HARDWARE DISPLAY REGISTER 



R0« 
Rl" 
R2» 
R3« 
R4> 
R5' 
R6« 
R7- 
SP« 



«0 
«1 

*z 

«5 
«4 
#5 
K6 
«7 
«6 



{ (GENERAL REGISTER 

(GENERAL REGISTER 

((GENERAL REGISTER 

(.GENERAL REGISTER 

(uENERAL REGISTER 

{GENERAL REGISTER 

(GENERAL REGISTER 

(GENERAL REGISTER 
(STACK POINTER 
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HA^ :Z OE^INITrONS 

00000/ 

000000 
000040 
000100 
000140 
000200 
000240 
000300 
000340 

100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 

100000 
040000 
020000 
010000 
004000 
002000 
001000 
000400 
000200 
000100 
000040 
000020 
000010 
000004 
000002 
000001 
001000 
000400 
000200 
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PC «7 ;;PROGRAH COUNTER 

s APRIORITY LEVEL DEFINITIONS 

PRO* 0 asPRIORITY LEVEL 

PRl- 40 ;;PRIORITY LEVEL 

PR2- 100 ;;PRIORITY LEVEL 

PR3« 140 ;jPRIORITY LEVEL 



PR4. 200 
PR5- 240 
PR6- 300 
PR7- 340 
;*"SUITCH REGISTER' 



sPRIORITY LEVEL 
;;PRIORITY LEVEL 
5;PRI0RITY LEVEL 
PRIORITY LEVEL 
SWITCH DEFINITIONS 



SW15- 
SU14 
SU13 
SW12 
SUll 
SUlO 
SW09 
SU06 
SW07 
SW06 
SU05 
SU04 
SU03 
SU02 
SWOl 
SUOO 
SU9- 
SU6« 

SWT- 
sue* 

SW5- 
SU4- 
SW3- 
SW2- 
SWl- 
SUO 



100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 
1 

SW09 
SU08 
SW07 
SU06 
SU05 
SW04 
SU03 
SW02 
SWOl 
SWOO 



;*DATA BIT DEFINITIONS (BITOO TO BIT15) 



BIT15 
BIT14 
3IT13 
BIT12 
BITll 
BITIO 
BIT09 
BIT08 
BIT07 
BIT06 
B1T05 
BIT04 
STT03 
BIT02 
BITOl 
BITOO 
BIT9. 
BIT6- 
BIT7- 



100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 
1 

BIT09 
BIT06 
BIT07 
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SEQ 0012 



BASIC OCr INI T IONS 



424 
425 
426 
427 

42a 

424 
430 
451 
452 
439 
434 
435 
456 
457 
456 
439 
440 
441 
442 
443 



445 
446 
447 
446 
449 
450 
451 
452 
453 
454 
455 
456 
457 
456 
459 
460 



000100 
000040 
000020 
000010 
000004 
000002 
000001 

000004 
000010 
000014 
000014 
000014 
000020 
000024 
000050 
00C034 
000060 
000064 
000240 
164160 
000001 
100000 
000400 
001000 



000020 
000030 

000040 
000050 
000060 
000070 

000100 
000110 
000120 
000130 

000140 
000160 
000170 

000200 
000240 



000240 
000244 
000250 
000254 



000300 
000260 
000340 



BIT6- 

BIT5- 

BIT4- 

BIT3- 

BIT2- 

BITl- 

BITO- 

:*BASIC 

ERftVEC- 

RESVEC> 

TBITVEC< 

TRTVEC- 

BPTVEC- 

lOTVEC- 

PURVEC- 

EMTVEC- 

TRAPVEC' 

TKVEC» 

TPVEC" 

PIRQVEC' 

ABASE- 

AOEVM- 

ROY- 

OIR- 

lE- 



BIT06 
BIT05 
BIT04 
BIT03 
BIT02 
BITOl 
BITOO 
"CPU" TRAP 
4 
10 
14 
14 
14 
20 
24 
30 
'34 
60 
64 
■240 
164160 
1 

BIT15 

BITS 

BIT9 



VECTOR ADDRESSES 

;TinE OUT AND OTHER ERRORS 
{RESERVED AND ILLEGAL INSTRUCTIONS 
j"T" BIT 
{TRACE TRAP 

{BREAKPOINT TRAP (BPT) 
; INPUT /OUTPUT TRAP (lOT) •♦SCOPE** 
;P0UER FAIL 

i EMULATOR TRAP (EMT) **ERR0R** 
{"TRAP" TRAP 
iTTY KEYBOARD VECTOR 
iTTY PRINTER VECTOR 
{PROGRAM INTERRUPT REQUEST VECTOR 
BASE ADDRESS 
DEFAULT TO ONE DRVllJ 



{CHIP COMMAND SUMMARY 
CIRMR- 20 
CSIRMR* 30 

CIMR- 40 

CSIMR- 50 

SIMR> 60 

SSIMR- 70 

CIRR- IOC 

CSIRR- 110 

SIRR« 120 

SSIRR- 130 

CHPISR- 140 
CISR- 160 
CSISR- 170 

LMD04> 200 
LM057- 240 



{CLEAR IRR AND IMR 

{CLEAR SINGLE IRR AND IMR BIT 

{CLEAR IMR 

{CLEAR SINGLE IMR BIT 
{SET ALL IMR BITS 
{SET SINGLE IMR BITS 

{CLEAR IRR 

{CLEAR SINGLE IRR BITS 
{SET ALL IRR BITS 
{SET SINGLE IRR BITS 

{CLEAR HIGHEST PRIORITY ISR BIT 
{CLEAR ISR 

{CLEAR SINGLE ISR BIT 

{LOAD MODE BITS M0-M4 
{LOAD MODE BITS M5-M7 



{CHIP MODE BIT PRESELECTION 
MISR- 240 
MIMR- 244 
MIRR- 250 
MACR> 254 



{CHIP WRITE PRESELECTION 



PACR- 
PIMR" 
PVMA" 



300 
260 
340 



{PRESELECT AuTO CLEAR REG. FOR URITING 
{PRESELECT IMR REG. FOR WRITING 
{PRESELECT VECTOR MEMORY ADDRESS 



CVOPCC DRVUJ DIAZ, TS' PUM 

BASIC oeriNiriONs 



461 
40^ 



000174 
000176 

000200 

463 

464 000100 
46S 



000000 



000174 
000000 
000000 

000137 
000100 
000104 



001402 
000200 
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.SSrTL TRAP CATCHER 
.-0 

S*ALL UNUSED LOCATIONS FROM 4 776 CONTAIN A ' .♦2.HALT" 
>*SEaUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
«*LOCATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
.-174 

DISPREG. .UORD 0 sjSOFTUARE DISPLAY REGISTER 

SUREG: .WORD 0 :: SOFTWARE SUITCH REGISTER 

.SBTTL STARTING ADDRESS(ES) 

JMP a«START ;;JUriP TO STARTING ADDRESS OF PROGRAM 

."100 

000002 .WORD 104.200.2 ;IF 'B EVENT' ON Q BUS IS CONNECTED 

;IGNORE IT'S INTERRUPT JUST DO A RTI 



SEQ 001 S 



I" 



Cvopcc rwviiJ c:t\ ts» pbii 

4CTli HOOKS 



000106 
000046 
000A46 OlSlSO 



Of C as 0«?:55 PAGE •» 



466 
469 

470 
4'1 
472 



oooos? 

0000S2 000000 
000106 
001000 



001000 

000024 
000024 000200 

000044 
000044 001000 

001000 



001000 
001000 
001002 
001004 
001006 
001010 
001012 



000000 
001170 
000006 
000024 
000024 
000051 



0014 



.♦■.8TTL ACTll HOOKS 



iHOOKS REQUIRED Bt ACTll 
I3VPC'. 
.-46 
IF NO AD 
.-52 

.WORD 0 

.-♦SVPC 

.•1000 



.SBTTL APT PARAMETER BLOCK 



tSAVE PC 

itDSET L0C.46 TO AOONCSS OF lENDAO IH 

it2}SET L0C.52 TO ZERO 
:i RESTORE PC 

tLONGEST TEST TIME 
1 1ST PASS RUN TIME 
lAOOITIONAL RUN TIME 



teop 



I SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 



. IX-. 

.•24 

200 

.•44 

tAPTHOR 



I SAVE DJRRENT LOCATION 

I SET POUER FAIL TO POINT TO START OF PROGRAM 
iFOR APT START UP 

t POINT TO APT INDIRECT ADDRESS PNTR. 
{POINT TO APT HEADER BLOCK 
I RESET LOCATION COUNTER 



: SETUP APT 
{INTERFACE 
•APTHO 
♦MISTS 
ir«AOR 
♦TSTM: 
tPASTM: 
tUNITM: 



PARAMETER BLOCK AS DEFINED 
SPEC. 



IN THE APT PDPU DIAGNOSTIC 



.WORD 0 iiTUO HIGH BITS OF 16 BIT MAILBOX AOOR. 

.WORD (MAIL iiADORESS OF APT MAILBOX CBITS O-IS) 

.WORD 6. iiRUN TIM OF LONGEST TEST 

.UORO 20. iiRUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFr) 

.UORO 20. itADDITIONAL RUN TIME CSECS) OF A PASS FOR EACH ADDITIONAL 

.MORD tETEND-IMAlL/2 itLENGTH MAILBOX -ETABLEC WORDS) 



JNIT 



CVWCC WUIJ DI4I, T*>t PRTl 
COHMON TA(,S 
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4 '5 



001170 
001170 
001172 
001174 
001176 
001200 
001202 
001204 
001206 
001210 
001210 
001211 
001212 



000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 

000 
000 
000000 







.S8TTL 


COHHON 


TAGS 








I*TMIS 


TABLE CONTAINS VARIOUS 


COnHQN STORAGE LOCATION'S 






i#USEO 


IN THE PROGRAM. 






001100 




.-1100 






oonoo 




ICMTAG: 




iiSTART OF COHhON TAGS 


001 100 


000000 




.WORD 


0 




001102 


000 


$TST^t1: .BYTE 


0 


ss CONTAINS THE TEST NUMBER 


001103 


000 


SERrLG: .BYTE 


0 


;s CONTAINS ERROR FLAG 


001104 


000000 


$ICNT: 


.UORO 


0 


iiCONTAINS SUBTEST ITERATION COUNT 


001106 


000000 


ILPAOR 


.WORD 


0 


siCONTAINS SCOPE LOOP ADDRESS 


OClllO 


000000 


$LPERR 


.WORD 


0 


;t CONTAINS SCOPE RETURN FOR ERRORS 


001112 


000000 


lERTTL: 


.WORD 


0 


i:CONTAINS TOTAL ERRORS DETECTED 


001114 


000 


IITEW 


: .BYTE 


0 


SiCONTAINS ITEM CONTROL BYTE 


001115 


001 


lERMAX 


: .BYTE 


I 


1 {CONTAINS MAX. ERRORS PER TEST 


001116 


000000 


$ERRPC 


.WORD 


0 


IiCONTAINS PC OF LAST ERROR INSTRUCTION^ 


001120 


000000 


SGDADR 


.WORD 


0 


IiCONTAINS ADDRESS OF GOOD DATA 


001122 


000000 


IBOAOR 


.WORD 


0 


SiCONTAINS ADDRESS OF BAD' DATA 


001124 


000000 


IGOOAT 


: .WORD 


0 


IiCONTAINS 'GOOD' DATA 


001126 


oooooc 


IBDDAT 


.WORD 


0 


1 {CONTAINS 'BAD' DATA 


001150 


000000 




.WORD 


0 


siRESERVED -NOT TO BE USED 


001152 


000000 




.WORD 


0 




001154 


000 


lAUTOB 


: .BYTE 


0 


siAUTOMATIC MODE INDICATOR 


001155 


000 


IINTAG: .BYTE 


0 


IS INTERRUPT MODE INDICATOR 


001156 


000000 




.WORD 


0 




001140 


177570 


SUR: 


.WORD 


DSUR 


11 ADDRESS OF SWITCH REGISTER 


001142 


177570 


DISPLAY: .WORD 


OOISP 


St ADDRESS OF DISPLAY REGISTER 


001144 


177560 


$TKS: 


177560 




jsTTY KBD STATUS 


001146 


177562 


ITKB: 


177562 




s sTTY KBD BUFFER 


001150 


177564 


ITPS: 


177564 




siTTY PRINTER STATUS REG. ADDRESS 


001152 


177566 


ITPB: 


177566 




isTTY PRINTER BUFFER REG. ADDRESS 


001154 


000 


INULL: 


.BYTE 


0 


isCONTAINS NULL CHARACTER FOR FILLS 


001155 


002 


IFILLS 


: .BYTE 


2 


t {CONTAINS # OF FILLER CHARACTERS REQUIRED 


001156 


012 


IFILLC 


: .BYTE 


12 


1 {INSERT FILL CHARS. AFTER A "LINE FEED' 


001157 


000 


ITPFLG 


: -BYTE 


0 


{{'•TERMINAL AVAILABLE" FLAG (BIT<07> -O^ yES ) 


001160 


000000 


ITIMES 


: 0 




{{MAX. NUMBER OF ITERATIONS 


001162 


000000 


lESCAPErO 




{{ESCAPE ON ERROR ADDRESS 


001164 


077 


lOUES: 


.ASCII 


/?/ 


{{QUESTION MARK 


001165 


015 


ICRLF: 


.ASCII 


<15> 


{{CARRIAGE RETURN 


001166 


012 000 


ILF: 


.ASCI2 


<12> 


{{LINE FEED 



.SBTTL APT riAILBOX-E TABLE 



.EVEN 

tMAIL: 

♦MSGTY 

♦FATAL 

tTESTN 

tPASS: 

lOEVCT: 

»ONIT: 

tMSGAO: 

*nSGLG: 

IE TABLE 

»ENV: 

♦ENVM: 

ISUREG: 



ttAPT riAILBOX 

.WORD AMSGTY i i MESSAGE TYPE CODE 

.UORO AFATAL i (FATAL ERROR NUMBER 

.UORO ATESTN iiTEST NUMBER 

.UORO APASS 1 1 PASS COUNT 

.UORO AOEVCT :iOEVZCE COUNT 

.UORO AUNIT 1 1 I/O UNIT NUMBER 

.UORO AMSGAO i {MESSAGE AODRESS 

.UORO AhsGLG i i MESSAGE LENGTH 

({APT ENVIROMCNT TABLE 

.BYTE AENV t lENVIROMCNT BYTE 

.BYTE AENVM : :ENVlRO»tCNT MOOE BITS 

.UORO ASUREG i lAPT SUITCH REGISTER 



CVDRCC i)RvnJPIAi, Tsi PRTl 
APT HAIL BOX STABLE 

001P14 000000 
001216 000000 



001220 000 

001221 000 



001222 000000 

001224 000 

001225 000 

001226 000000 
001250 000 

001231 000 

001232 000000 

001234 000 

001235 000 

001236 000000 
001240 000000 
001242 000000 
001244 164160 
001246 000001 
001250 000000 
001252 
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SUbWR: .UORD 
SCPUOP: .WORD 



SHAMS 1: .BTTE 

IMTYPl: .BYTE 

IMADRl: .UORD 

$MAMS2: .BYTE 

IMTYP2: .BYTE 

$MA0R2: .WORD 

$MAMS3: .BYTE 

SMTYP3: .BYTE 

$MA0R3: .MORD 

SMAMSA: .BYTE 

$MTYP4: .BYTE 

$MA0R4: .WORD 

IVECTl: .WORD 

$VECT2: .WORD 

IBASE: .WORD 

IDEVM: .WORD 

ICDUl: .WORD 
♦ETEND: 
.MEXIT 
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SCO MM 



AUSWR isUSER SWITCHES 
ACPUOP iiCPU TYPE. OPT IONS 
BITS 15 11-CPU TYPE 

11/04-01. 11/05-02.11/2C-03. 11/40-04. 11/45-05 
11/70-06. PDQ-07.Q-10 
BIT lO-REAL TIHE CLOCK 
BIT 9-rLOATING POINT PROCESSOR 
BIT 8-HEHORY HANAGEHENT 
AHAHSl siHiGH ADDRESS. H.S. BYTE 
AHTYPl ;;HEH. TyPE.BLK^I 

HEH.TYPE BYTE — (HIGH BYTE) 
900 NSEC CORE -001 
300 NSEC BIPOLAR-002 
500 NSEC HOS-005 
AHADRl ;sHlGH ADDRESS. BLK^l 

HEH.LAST ADDR.-3 BYTES. THIS WORD AND LOW 0^ ^yPE ABOVE 
AHAHS2 ;iH:GH ADDRESS. H.S. BYTE 
AHT YP2 ; I ^H . T YPE , BLK^2 
AHA0R2 jiHEH.LAST ADDRESS .BLK^2 
AMAHS3 II HIGH ADDRESS. H. S .BYTE 
AHT YP3 II HEH . T YPE . BLK^3 
AHADR3 siHEH.LAST ADDRESS. BLK#3 
AHAHS4 ; I HIGH ADDRESS. H. S. BYTE 
AHT YP4 1 1 HEH . T YPE . BLK#4 
AHA0R4 iiHEH.LAST ADDRESS .BLK^4 
AVECTl 1 1 INTERRUPT VECTOR^l.BUS PRIORITy^I 
AVECT2 I {INTERRUPT VECT0RO2flUS PRI0RITy^2 
ABASE iiBASE ADDRESS OF EOUIPHENT UNDER TEST 
ADEVH :iDEVICE HAP 

ACOWl liCONTROLLER DESCRIPTION WORD^I 



CvORrC TUll.i CIA(, Tsi PRll 
ERROR POINTER TABLE 
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001252 

474 

475 001252 

476 001254 

477 001256 
4 78 001260 
479 

460 

481 001262 

482 001264 

483 001266 

484 001270 
485 

486 

487 001272 

488 001274 

489 001276 

490 001300 
491 

49i 

493 001302 

494 001304 

495 001306 

496 001310 
497 

496 

499 001312 

500 001314 

501 001316 

502 001320 
503 

504 

505 001322 

506 001324 

507 001326 
506 001330 
509 

510 
511 

512 001332 

513 001334 

514 001336 

515 001340 
516 

517 
516 
519 



017022 
017154 
017276 
000000 



017041 
017154 
017276 
000000 



017063 
017154 
017276 
000000 



017076 
017154 
017276 
000000 



017111 
017154 
017276 
000000 



017124 
017154 

017276 
000000 



017137 
017154 
017276 
000000 



.SBTTL ERROR POINTER TABLE 

:*THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAN OCCUR. 
;*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
♦LOCATION llfEMB. THIS NUMBER INDICATES WHICH ITEM IN THE TABLE IS PERTINEN* . 



♦NOTtl: 
*N0TE2! 

tERRTB: 
t ERROR 



i ERROR 



i ERROR 



: ERROR 



i ERROR 



(ERROR 



s ERROR 



EM 
DH 
DT 
DF 

1 

EMI 
DHl 
DTI 
0 

2 

EM2 
DHl 
DTI 
0 

3 

EM3 
DHl 
DTI 
0 

4 

EM4 
DHl 
DTI 
0 

5 

EM5 
DHl 
DTI 
0 

6 

EM6 
DHl 
DTI 
0 



7 

EM7 
DHl 
DTI 
0 



IF $ITEMB IS 0 THE ONLY PERTINENT DATA IS (lERRPC). 
EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED FOLLOu'j: 
: {POINTS TO THE ERROR MESSAGE 
:iPOINTS TO THE DATA HEADER 
:iPOINTS TO THE DATA 
I {POINTS TO THE DATA FORMAT 



{REG TIMEOUT ER 

;ERRPC TSTNUM BUSADR EXPCT RCVD 
tIERRPC TSTNUM fBDADR IGOOAT SBDDAT(R5) 



:REG READ/URITE ER 

:ERRPC TSTNUM BUSADR EXPCT RCVD 
tIERRPC TSTNUM (BDAOR (GDDAT tBDDATCRS) 



;IRR REG ER 

tERRPC TSTNUM BUSADR EXPCT RCVD 
:(ERRPC TSTNUM IBDADR IGDDAT (BDDATCR5) 



iACR REG ER 

iERRPC TSTNUM BUSADR EXPCT RCVD 
(lERRPC TSTNUM IBDADR >GODAT $BDDAT(R5) 



ilMR REG ERROR 

tERRPC TSTNUM BUSADR EXPCT RCVD 

i lERRPC TSTNUM IBOAOR IGOOAT IBDDAT(R5) 



sISR REG ERROR 

lERRPC TSTNUM BUSAOR EXPCT RCvD 

I lERRPC TSTNUM IBDADR IGDDAT IBDDAT(R5) 



{CHIP STAT ER 

tERRPC TSTNUM BUSADR EXPCT RCVD 

i lERRPC TSTNUM IBDADR IGDDAT IBDDAT(R5) 



i BUS REGISTER ADDRESS POINTERS 



CVDRCC IWVllJ CIAi, Tst PRTl 
ERROR POINTER TABLE 
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SEG 0016 



520 

521 001S42 

522 001344 

523 001346 

524 001350 

525 001^52 

526 001354 

527 001356 
52a 001360 
529 

530 
531 
532 

533 001362 

534 001364 

535 001366 

536 001370 

537 001372 
536 001374 

539 001376 

540 001400 



164160 
164162 
164164 
164166 
164170 
164172 
164174 
164176 



000000 
0C9001 
000000 

oocooo 

000000 
000000 
000000 
000000 



ORCSA 
OROBA 
DRCS8 
DRDB8 
DRCSC 
DR06C 
ORCSD 
DROBO 



ABASE 
ABASE •2 
ABASE *4 
ABASE «6 
ABASE* 10 
ABASE* 12 
ABASE •14 
ABASE* 16 



iCOmON PROGRAM LOCATION.' S) 



TSTNUM: 0 

OMAP: 1 

INTFLG: .UORO 0 

XXOP: .WORD 0 

IMRLOC: .WORD 0 

ISRLOC: .WORD 0 

IRRLOC: .UORO 0 

ACRLOC: .UORO 0 



iCONIAINCi TEST NUMBER ON ERROR 



CvORCC ORviiJ L"':«»(, rsi prti 
PROCRAH START 
545 

S44 001402 
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SEQ 0019 



001402 
001406 
001410 
001414 
001416 

001422 
001430 
001436 
001444 
001452 
001460 
001466 
001474 
001502 
001506 
001512 
001520 
001526 



012706 
005026 
022706 
001374 
012706 

012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
005037 
005037 
112737 
012737 
012737 



001100 

001140 

001100 

015576 
000340 
015050 
000340 
016646 
000340 
016442 
000340 
001160 
001162 
000001 
001520 
001526 



START: 
.SBTTL 
ii CLEAR 



.SBTTL PROGRAW START 



ilLOOP BACK IF NO 

t: SETUP THE STACK POINTER 



000020 
000022 
000030 
000032 
000034 
000036 
000024 
000026 



001115 
001106 
001110 



INITIALIZE THE COMMON TAGS 
THE COMMON TAGS (tCMTAG) AREA 

•$CMTAG.R6 : (FIRST LC.ATION TO BE CLEARED 

(R6)* mCLEAR memory LOCATION 

•SUR.R6 :tD0NE? 
. -6 

•1100. SP 
FEW VECTORS 

«)SC0PE.8«I0TVEC :sI0T VECTOR FOR SCOPE ROUTINE 
♦540.84I0TVEC»2 j : LEVEL 7 

«»ERR0R.8«EMTVEC i tEMT VECTOR FOR ERROR ROUTINE 
«540.9«EMTVEC»2 i i LEVEL 7 

«>TRAP.8*TRAPVEC ;tTRAP VECTOR FOR TRAP CALLS 
»340.MTRAPVEC»2iLEVEL 7 
•tPURDN.8«PURVEC POWER FAILURE VECTOR 
«340.S«PWRVEC»2 t i LEVEL 7 

♦TIMES ; INITIALIZE NUMBER OF ITERATIONS 

f ESCAPE ;i CLEAR THE ESCAPE ON ERROR ADDRESS 

♦I.IERMAX It ALLOW ONE ERROR PER TEST 

«..<LPAOR :s INITIALIZE THE LOOP ADDRESS FOR SCOPE 

«..ILPERR it SETUP THE ERROR LOOP ADDRESS 

ssSIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 

SETUP FOR A SOFTWARE SWITCH REGISTER. 



MOV 
CLR 
CMP 
BNE 
MOV 

i {INITIALIZE A 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
MOV 
CLR 
CLR 
MOVB 
MOV 
MOV 



001534 


013746 


000004 






MOV 


8«ERRVEC.-(SP) 


(iSAVE ERROR VECTOR 




001540 


012737 


001574 


000004 




MOV 


•64>.8«ERRVEC 


stSET UP ERROR VECTOR 




001546 


012737 


177570 


001140 




MOV 


•OSWR.SWR 


M SETUP FOR A HARDWARE SWICH REGISTER 


001554 


012737 


177570 


001142 




MOV 


#ODISP. DISPLAY 


;;AND A HARDWARE DISPLAY REGISTER 


001562 


022777 


177777 


177350 




CMP 


4-l.SSWR 


({TRY TO REFERENCE HARDWARE SWR 




001570 


001012 








BNE 


66 < 


::BRANCH IF NO TIMEOUT TRAP OCCURRED 
















::AND THE HARDWARE SWR IS NOT - 


1 


001572 


000403 








BR 


65$ 


; {BRANCH IF NO TIMEOUT 




001574 


012716 


001602 




64$: 


MOV 


«65$.(SP) 


;sSET UP FOR TRAP RETURN 




001600 


000002 








RTI 








001602 


012737 


000176 


001140 


65$: 


MOV 


«SWREG.SWR 


: (POINT TO SOFTWARE SWR 




001610 


012737 


000174 


001142 




MOV 


♦DISPREG. DISPLAY 




001616 


012637 


000004 




66$: 


MOV 


(SP)».S«ERRVEC 


: (RESTORE ERROR VECTOR 




001622 


005037 


001176 






CLR 


tPASS 


i (CLEAR PASS COUNT 




001626 


132737 


000200 


001211 




BITB 


♦APT3IZE.$ENVM 


((TEST USER SIZE UNDER APT 




001634 


001403 








BEQ 


67$ 


((YES. USE NON-APT SWITCH 




001636 


012737 


001212 


001140 




MOV 


«$SWREG.SWR 


((NO. USE APT SWITCH REGISTER 




001644 








67t: 








545 001644 


005037 


001172 






CLR 


$FATAL 


(CLEAR ERROR NUMBER 




546 001650 


005037 


001170 






CLR 


$MSGTYP 


(CLEAR MESSAGE TYPE 




547 001654 


005037 


001174 






CLR 


$TESTN 


(CLEAR TEST NUMBER 




54a 001660 


004737 


017330 






CALL 


FALCON 


( CHECK FOR FALCON (KXTll) 


cGPA 


549 001664 


001420 








BEQ 


1000$ 


t BR IF NOT KXTll SYSTEM 


(iGPA 


550 001666 


042737 


000040 


000022 




BIC 


«40,8«22 


t YES. STRAP lOT... 


J(GPA 


551 001674 


042737 


000040 


000032 




BIC 


«40.S*32 


( . . .EMT. . . 


J (GPA 


552 001702 


042737 


000040 


000036 




BIC 


M0.S436 


( . . .AND TRAP TO LEVEL 6. 


5,GPA 


553 001710 


023727 


001244 


164160 




CMP 


$BASE.«ABASE 


{ IS $BASE VIRGIN ?7 


{{GPA 


554 001716 


001003 








BNE 


1000$ 


J BR IF NOT. 


((CPA 


555 001720 


012737 


174160 


001244 




MOV 


«174160.$BASE 


{ YES. USE ENGINEERING DEFAULT 


(jGPA 


556 001726 








1000»: 








»|GPA 


557 








s CHECK 


OPERATING ENVIRONMENT 






556 001726 


005737 


000042 






TST 


a«42 


(ARE WE IN ACT/XXOP AUTO MODE? 





CvoRCC nnvu.i ciAt, tsi p«ii 

INiriALl2e THC COmON TAC. 







WA^ i V 






Wl f 




AAAA43 




OOI 74^ 


W A^ X\J 






W A f 


ftl 37X7 
Uac f O r 


1 77777 
X f f f f f 




001 7S5 








A01 754 




AA1 31 A 
W AC AU 






AOI AOX 
V/U AwV J 




•'WW 


Ml 7A4 


1 137X7 
A AC f O r 


AOAAA1 




















001 77P 


005337 


177 777 




ftOl 77di 

WA ' 'w 


001013 

AwAC 




^ f L 




0057X7 


001 1 X4 

WA A 


^ f €> 


AApnA4 


00140X 






WC\^/w 


005757 


001S70 

WW A J * V 






001404 




575 




1O4401 

A V^"»V A 


016736 

WA\/ > Cw 


576 




104401 


016773 

VAw 19^ 


577 








57S 








579 




005757 


001134 

WA A 


5A0 




001001 

W A WW A 




5A1 


00203P 


104406 

A V*t"t Vw 




SAP 




005037 


001303 


5 AS 




Ai X7X7 

V A^ ' J * 


001346 

W AC^w 


5A4 


WC\^^w 


0437X7 


1 77760 


5A5 


OOP054 


01 X^'OI 

VA J • wA 


AO 1344 

\/V AC**** 


5A6 


WCWwV 


0101 X7 


AA1 X43 






OX37X7 

w^C t O f 


A00001 
wvwx 


5AA 

www 


00207P 


001 003 
%/VA WC 






002074 

wVCw • ~ 


0A01 X7 


AI XAA6 


590 


W(C AV/V 


01 3700 
VAC f W 


AA1 X43 
WA w**C 


591 


A4 


A 1 A 1 3 A 




592 


0021 


A637A1 


AAAAA3 


593 


WCX Ic 


A337AA 


AA1 XA3 


594 


OOP! 16 

WWC A Aw 


001573 

Vw A^ f C 




595 


002120 


012706 


001100 


596 


002124 


012705 


001126 


597 


002150 


015737 


001202 


596 


0021S6 


106427 


000340 


599 








600 








601 








602 











002142 


000004 




605 


002144 


005057 


001124 


604 


002150 


005015 




60S 


002152 


012757 


002206 


606 


002160 


015700 


001342 


607 


002164 


012701 


000010 


6oa 


002170 


01005/ 


001122 


609 


002174 


005010 




610 


002176 


005720 




611 


002200 


005501 




612 


002202 


001405 





000046 
001370 
000001 
001154 



001564 
001564 



001564 



001200 



000004 



spr: 

51: 



4t; 



O^C 85 


01:55 PAGf 


11 


I 




DCU 


I » 




; BRANCH IF NO 


CMP 


av4^ , 9046 




;I5 IT ACT AUTO MODE? 




21 




J BRANCH IF YtS 


MOV 


0 l.XXOP 




;SET XXDP CHMN MODE INDICATOR 


BR 


21 








CMPB 


lENV , 01 




;ARE WE IN APT AUTQ MODE; 


dNc. 






2 BRANCH IF NO 


MUVo 






;SET AUTO MODE INDICATOR 


T T f 1 C TC 


kjnT TkJ APT 


no 
UH 


APT AUTO MODE 


INC 


A 1 






FIRST TIME? 




D» 






SKIP TITLE IF NO 


TC T 

Tb 1 


« Ai iTno 
1 1 Ub 






;ARE UE IN AUTO MODE? 




4 S 






BRANCH TO TITLE TyPEOUT IF NOT 


TST 


XXDP 






.IS THE AUTO MODE UNDER XXDP? 


BEQ 


5$ 






,SKIP TITLE IF NOT 


TYPE 


.TITLED 






iPRINT OUT THE TITLE 


TYPE 


, TLCABL 






{PRINT "DRVllJ CABLE REQ'D' 



:GeT THE VALUE 
5»: 



IN THE SOFTWARE SUITCH REGISTER 



TST 


lAUTOB 


sARE WE IN AUTOMATIC MODE? 


BNE 


START 1 


; BRANCH IF YES 


GTSUR 




sASK FOR SWR INPUT FROM CONSOLE 


CLR 


$UNIT 


: CLEAR UNIT NUMBER 


MOV 


IDEVM.DMAP 


jPOSITION OF DRVll-J'S 


BIG 


♦177760. DMAP 


;UP TO 4 DRVll-J'S ONLY 


MOV 


IBASE.Rl 


;GET BASE ADDRESS 


MOV 


Rl.DRCSA 


iMAKE BUS REG. POINTER - $BASE 


BIT 


♦l.DMAP 


sis FIRST DRVll-J SELECTED? 


BNE 


NEXPAS 


I YES 


JMP 


NXDEVl 


;ADVANCE BASE DRVlI-J ADDRESS 


MOV 


#ORCSA.RO 


;SET UP REGISTER ADDRESS POINTERS 


MOV 


Rl.(RO)^ 


jLOAD EM.Rl • DRVll-J CSRA ADDRESS 


ADD 


♦2»R1 


sDO POINTERS FOR ALL REGS. A THRU D 


CMP 


M)RDBD^2.R0 


;ALL DONE? 


BNE 


NEXPAl 


sBR IF NOT 


MOV 


♦STACK. SP 


1 ALWAYS RESET STACK 


MOV 


♦»BDDAT.R5 


;INIT R5 WITH IBDDAT 


MOV 


lUNIT.IDEVCT 


;LOAD APT COUNTER WITH UNIT NO. 


MIPS 


♦PR7 


J SET PRIORITY TO 7 



;*TEST 1 TEST THAT ALL REGISTERS ARE ADDRESSABLE 



TSTl: SCOPE 

CLR $GDDAT 

CLR (R5) 

MOV ♦2I.8«ERRVEC 

MOV DRCSA.RO 

MOV ♦6..R1 

1$: MOV RO.tBDAOR 

CLR (RO) 

TST CRO)* 

DEC Rl 

BEQ 3$ 



;N0 DATA COMPARE 

sNO DATA COMPARE 

;SET UP TIMEOUT RETURN ADDRS 

;SET UP 1ST DRVll BUS ADRS 

SET UP REG COUNT 

SET UP CURRENT DRV BUS ADRS 

SEE IF THERE 

BUMP TO NEXT 

COUNT 8 OF THEM 

BR IF ALL. DONE 
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Tl TEST THAT ALL REGISTERS ARE ADDRESSABLE 



SfO 00<fi 



613 002P04 

614 002206 

615 002210 

616 002212 
617 

616 



000771 
022626 
104001 

012737 000006 



BR 1$ ;TRY NEXT 

2i: CMP (SP)».(SP)* j^ix STACK SINCE NO RTI 

ERRORS 1 iBUS ADRS INDICATED DID NOT RESPOND 

000004 3$: MOV ♦ERRVEC*2.S^RRVEC iRESTORE LOC « 



5*TEST 2 



TEST CSRA W/R DIR BIT, INT. CHIP RESET STATUS 













1 3 i c : 








^1 o 




A1 XTAA 


AA1 XAO 






MOW 


DRCSA.RO 


:GET CSR ADDRESS 








AA1 






nuv 


ORCSC.Rl 


: STORE CSRC ADDRESS 


Ocl 














(RO) 


;INIT CSRA 






AA^AI 1 










(Rl) 


;INIT CSRC 


O^O 




A1 AAX7 


AA1 1 






MAU 

nuv 


RO.iBOADR 


; STORE CSR ADDRESS 


Oc* 
















sSET UP EXPECTED DATA 






A1 07X7 


1 AA7AA 
lUU r W 


A A 1 1 OA 
Wl Ic*^ 




MAU 

nuv 


«R0Y!DIR!BIT7!BIT6.IGDDAT 






112 7 AA 


AAAAA1 


AAAAA1 
WVWl 






«eiT0.1(R0) 


;SET DIRECTION BIT 


Oc ' 




A1 1 A1 ^ 








MAU 

nuv 


CR0).(R5) 


sGET CSR DATA 








AAAAA7 
WWW f 








♦7.CR5) 


s CLEAR UNOEflNEO BITS 








AA1 1 






PMP 


♦G00AT.(R5) 








AA1 Af\^ 








QPA 


100$ 








1 AAAA3 










2 


(CSRA ERROR 




WCC f 


A1 A1 X7 


AA1 1 
Wl Ic^ 




1 AAt • 
iw* : 


MAU 
nuv 


R1.«B0ADR 


(STORE CSRC ADDRESS 


#;xx 




A1 07X7 


AAA^AA 


A A 1 1 OA 
Wllc*t 




MAU 
nuv 


«BIT7.*G0DAT 


(STORE EXPECTED 






A1 1 1 1 <^ 








MAU 

nuv 


(R1),CR5) 


(STORE CSRC 


#^x^ 






AAAAA7 






OTP 
DlU 


»7,(R5) 


(CLEAR UNDEFINED BITS 








AA1 1 OA 






TMO 


♦GD0AT.(95) 




637 


002320 


001401 








BEQ 


1« 




638 


002322 


104002 








ERROR* 


2 


(CSRC ERROR 






A1 AA'V7 


AA1 1 DO 




1$: 


HOV 


R0.I60ADR 


(CSRA ADDRESS 


640 


002330 


012737 


100300 


001124 




MOV 


«R0Y!BIT7!BZT6.»G0DAT 


641 


002336 


105060 


000001 

www 4k 






CLRB 


l(RO) 


(CLEAR CSRA DIR BIT 


642 


002342 


011015 








MOV 


(R0).(R5) 


(READ CSR 


643 


002344 


042715 


000007 






SIC 


•7.(R5) 


(CLEAR UNDEFINED BITS 


644 


002350 


023715 


001124 






CMP 


IGOOAT.CRS) 




645 


002354 


001401 








BEQ 


21 


({BR IF EQUAL 


646 


002356 


104002 








ERROR » 


2 




647 


002360 


012737 


000300 


001124 


2>: 


MOV 


«BIT7JBIT6.*G00AT 


648 


002S66 


112761 


000001 


000001 




MOVB 


•BITO.KRl) 


(CSRC TO OUTPUT MODE 


649 


002374 


011015 








MOV 


(R0).(R5) 


(READ CSRA 


6S0 


002376 


042715 


000007 






BIC 


•7.(R5) 


(CLEAR UNDEFINED BITS 


651 


002402 


023715 


001124 






CMP 


»G00AT.(R5) 


(CHECK IF ROY BIT CLEARED 


652 


002406 


001401 








BEQ 


TST3 


((BR IF EQUAL 


653 
654 


002410 


104002 








ERROR » 


2 


(CSRA REG ERROR 


655 






















j*TEST 


3 


TEST CSRA INT. 


ENABLE BIT 



002412 

656 002414 

657 002420 

658 002424 

659 002430 

660 002436 

661 002442 

662 002450 

663 002454 



000004 TST3: SCOPE 

004737 013164 JSR PC.CLRCSR (CLEAR CSR REGISTER 

013700 001342 MOV DRCSA.RO (GET CSRA ADDRESS 

013701 001352 MOV ORCSC.Rl (GET CSRC ADDRESS 
112761 000001 000001 MOVB «6IT0.1(R1) (SET DIRECTION BIT CSRC 
010037 001122 MOV RO.IBDAOR (STORE CSRA ADDRESS 
012737 001300 001124 MOV «6IT9!BIT7!BIT6. $GDOAT 

012710 001000 MOV WE.CRO) (SET INTERRUPT ENABLE BIT 

011015 MOV (R0).(R5) 
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SEO 00^2 

TFSr CSRA INT. EMOLE BIT 



664 


002456 


042715 


000007 


BIC 


»7.(R5) 


: CLEAR UNOEriNCD BITS 


665 


002462 


025715 


001124 


CMP 


iGOOAT.CRS) 




666 


002466 


001401 




BEQ 


1* 




667 


002470 


104002 




ERROR* 


2 


J INT. ENABLE ERROR.CSRA 


666 


002472 


012737 


000300 0011P4 1$: 


MOV 


«8IT7!BIT6.$G0DAT 


669 


002500 


105060 


000001 


CLRB 


ICRO) 


sCLEAR I/E BIT 


670 


002504 


011015 




MOV 


(R0).(R5) 




f7l 


002506 


042715 


000007 


BIC 


*7.(R5) 


; CLEAR UNDEriNEO BITS 


672 


002512 


023715 


001124 


CMP 


♦GODAT.CRS) 




673 


002516 


001401 




BEQ 


TST4 


i:BR IF EQUAL 
:CSRA ERROR 


674 


002520 


104002 




ERROR* 


2 



675 



iilEST 4 TEST CSRA I/E.OIR BIT 





002522 


000004 






TST4: 


SCOPE 






677 


002524 


004737 


013164 






JSR 


PC.CLRCSR 


s CLEAR CSR REGISTERS 


678 


002530 


013700 


001342 






MOV 


DRCSA.RO 


tGET CSRA m:)DRESS 


679 


002534 


010037 


001122 






MOV 


RO.$BDADR 


;SAVE CSRA A?MESS 


660 


002540 


012737 


101700 


001124 




MOV 


n01700.«G00AT 


J EXPECTED I/E.DIR 


661 


002546 


112760 


000003 


000001 




MOVB 


«6IT1!BIT0.1CR0) 


662 
















»SET I/E AND DIR BIT 


663 


002554 


011015 








MOV 


CROj.CRS^ 




684 


002556 


042715 


000007 






BIC 


♦7.(R5) 


: CLEAR UNDEFINED BITS 


685 


002562 


023715 


001124 






CMP 


«GDDAT,CRS) 




666 


002566 


001401 








BEQ 


1« 




687 


002570 


104002 








ERROR* 


2 


:CSRA ERROR 


688 


002572 


012737 


100300 


001124 


1(: 


MOV 


♦RDY!BIT7!BIT6.»G00AT 


689 


002600 


005010 








CLR 


(RO) 




690 


002602 


011015 








nov 


(R0).(R5) 




691 


002604 


042715 


000007 






BIC 


♦7.(R5) 


:CLEAR UNDEFINED BITS 


692 


002610 


023715 


001124 






CMP 


tCODAT.CRS) 




693 


002614 


001401 








BEQ 


TST5 


ssBR IF EQUAL 
:CSRA ERROR 


694 


002616 


104002 








ERROR* 


2 



695 
696 
697 

;*TEST 5 TEST CSRB U/R OIR BIT, INT CHIP RESET STATUS 





002620 


000004 






TST5: 


SCOPE 






698 


002622 


004737 


013164 






JSR 


PC.CLRCSR 


; CLEAR CSR REGISTERS 


699 


002626 


013700 


001346 






MOV 


ORCSB.RO 


:GET CSR ADDRESS 


700 


002632 


013701 


001356 






MOV 


ORCSD.Rl 


(GET CSRD ADDRESS 


701 


002636 


010037 


001122 






MOV 


RO>*BDADR 


1 STORE CSR ADDRESS 


702 


002642 


012737 


100400 


001124 




MOV 


#ROY!DIR,$GODAT 


a SET UP EXPECTED DATA 


703 


002650 


112760 


000001 


000001 




MOVB 


•BITO.KRO) 


iSET DIRECTION BIT 


704 


002656 


011015 








MOV 


(R0).(R5) 


:GET CSRB DATA 


705 


002660 


023715 


001124 






CMP 


«G00AT.(R5) 




706 


002664 


001401 








BEQ 


1001 




707 


002666 


104002 








ERROR* 


2 


;CSR6 ERROR 


706 


002670 


010137 


001122 




100»: 


MOV 


Rl.tBDADR 


1 STORE CSRD ADDRESS 


709 


002674 


005037 


001124 






CLR 


»GD0AT 


1 STORE EXPECTED 


710 


002700 


011115 








MOV 


(R1).(R5) 


:READ CSRD 


711 


002702 


023715 


001124 






CMP 


>GDDAT.(R5) 


712 


002706 


001401 








BEQ 


1< 




713 


002710 


104002 








ERROR* 


2 


;CSRO ERROR 


714 


002712 


010037 


001122 




1$: 


MOV 


R0,$BDADR 


: STORE CSRB ADDRESS 
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15 TEST CSRB U/R DIR OIT.INT CHIO RESET STATUS 



SEO OOkl 



715 002716 

716 002724 

717 002750 

718 002752 

719 002756 

720 002740 

721 002742 
:22 002746 
725 002754 

724 002756 

725 002762 

726 002764 
727 

728 



002766 

729 002770 

730 002774 
751 005000 

732 003004 

733 003010 

734 003016 

735 003024 

736 '*C»026 

737 00^>32 
758 005036 

739 005040 

740 005042 

741 005046 

742 005054 
745 005056 

744 005062 

745 005066 

746 005070 

747 005072 

748 003076 

749 005104 

750 005110 

751 005112 

752 005116 
755 005122 

754 003124 

755 005126 

756 003134 

757 003142 

758 005144 

759 005150 

760 005154 

761 005156 
762 

763 



012757 
105060 
011015 
023715 
001401 
104002 
005057 
112761 
011015 
025715 
001401 
104002 



00C004 
004757 
015700 
015701 
010057 
012757 
112760 
011015 
042715 
025715 
001401 
104002 
010157 
012757 
011115 
042715 
023715 
001401 
104002 
010037 
012737 
105060 
011015 
042715 
025715 
001401 
104002 
012737 
112761 
011015 
042715 
023715 
001401 
104002 



003160 000004 

764 005162 004757 

765 005166 015700 



100000 001124 
000001 

001124 



001124 

000001 000001 
001124 



2»! 



015164 
001552 
001542 
001122 
100600 
000001 

000007 
001124 



001122 
000300 

000007 
001124 



001122 
100200 
000001 

000007 
001124 



000200 
000001 

00C007 
001124 



MOV 


ORDY • $GOOAT 


; STORE EXPECTED 


CLRB 


l(RO) 


sCLFAR CSR DIR BIT 


MOV 


(R0),(R5) 


;REAO CSR 


CMP 


$G0DAT,(R5) 


BEQ 


2% 


;;BR IF EQUAL 


ERRORS 


2 




CLR 


$GDDAT 


5 STORE EXPECTED 


MOVB 


OBITO.KRl) 


;CSRD TO OUTPUT MODE 


MOV 


(R0).(R5) 


:REAO CSRB 


CMP 


$GDDAT.(R5) 


sRDY BIT CLEARED 


BEQ 


TST6 


;;BR IF EQUAL 
sCSRB REG ERROR 


ERRORS 


2 



t*TEST 6 



TEST CSRC U/R DIR BIT. INT CHIP RESET STATUS 



TST6: 



001124 
000001 



001124 



100*: 



001124 



II: 



001124 
000001 



2*: 



SCOPE 






JSR 


PC.CLRCSR 


i CLEAR CSR REGISTERS 


MOV 


ORCSC.RO 


.GET CSR ADDRESS 


MOV 


DRCSA.Rl 


(GET CSRA ADDRESS 


MOV 


RO.»BDAOR 


(STORE CSR ADDRESS 


MOV 


«R0Y!DIR!BIT7.)G00AT 


MOVB 


«BIT0.1(R0) 


{SET DIRECTION BIT 


MOV 


(R0).(R5) 


sGET CSR DATA 


BIC 


•7.(R5) 


(CLEAR UNDEFINED BITS 


CMP 


«G00AT.(R5) 




BEQ 


1001 




ERROR » 


2 




MOV 


R1.»BDADR 


(STORE CSR ADDRESS 


MOV 


«BIT7!BIT6.$G0DAT 


MOV 


(Rl).(R5) 


(READ CSRA 


BIC 


♦7,(R5) 


(CLEAR UNDEFINED BITS 


CMP 


tGD0AT.(R5) 


BEQ 


11 


(CHECK CSRA 


ERROR* 


2 


(CSRA ERROR 


MOV 


RO.fBDAOR 


(STORE CSR ADDRESS 


MOV 


«RDY!BIT7.*GD0A1 


(STORE EXPECTED DATA 


CLRB 


KRO) 


(CLEAR CSR DIR BIT 


MOV 


(R0).(R5) 


(READ CSR 


BIC 


♦7,(R5) 


(CLEAR UNDEFINED BITS 


CMP 


(G0DAT.CR5) 




BEQ 


2$ 


{(BR IF EQUAL 


ERROR* 


2 


MOV 


«BIT7.«G0DAT 


(EXPECTED DATA 


MOVB 


•BITO.KRl) 


(CSRA TO OUTPUT MODE 


MOV 


(R0).(R5) 


(READ CSRC 


BIC 


#7.(R5) 


(CLEAR UNDEFINED BITS 


CMP 


«G0DAT.(R5) 


(RDY BIT CLEARED 


BEQ 


TST7 


{(BR IF EQUAL 


ERROR* 


2 


(CSRC REG ERROR 



015164 
001556 



{ 

{♦TEST 7 
( (♦♦♦*•♦ 

TST7: 



SCOPE 
JSR 
MOV 



TEST CSRO U/R DIR BIT. INT CHIP RESET STATUS 



PC.CLRCSR (CLEAR CSR REGISTERS 

ORCSD.RO (GET CSR ADDRESS 



I 

CVDRCC ORVllJ DIAr, TST PRTl MACRO M1200 J7 OFC 85 09:55 PAGE II 5 
TEST CSRD W/R DW OIT.INT CHIP RESET STATUS 



001124 
000001 



766 


005172 


015701 


001546 


76/ 


003176 


010057 


001122 


768 


003202 


012757 


100400 


769 


005210 


112760 


000001 


770 


005216 


011015 




771 


005220 


025715 


001124 


772 

-•'75 


005224 


001401 




005226 


104002 




774 


005250 


010157 


001122 


775 00S2S4 


005057 


001124 


776 


005240 


011115 




777 


005242 


023715 


001124 


778 


003246 


001401 




779 005250 


104002 




780 005252 


010037 


001122 


781 


005256 


012737 


100000 


782 


005264 


105060 


000001 


785 


005270 


011015 




784 


005272 


023715 


001124 


785 


005276 


001401 




786 


005300 


104002 




787 


005502 


005057 


001124 


788 


005506 


112761 


000001 


789 005514 


011015 




790 


005516 


025715 


001124 


791 


005522 


001401 




792 


005324 


104002 




793 








794 











003326 


000004 




795 


003550 


004737 


013164 


796 


005554 


012705 


013272 


797 


005540 


012757 


005370 


798 


005546 


015700 


001342 


799 005552 


015701 


001544 


800 


003356 


010157 


001122 


801 


005362 


112760 


000001 


802 


003570 


011557 


001124 


805 


005574 


005011 




804 


005576 


051511 




805 


005400 


011115 




806 


005402 


025715 


001124 


807 


005406 


001401 




808 


005410 


104002 




809 


005412 


005725 




810 003414 


020327 


015572 


811 


003420 


001363 




812 








813 










005422 


000004 




814 


005424 


004737 


015164 


815 


005450 


012705 


015272 


816 


003434 


012737 


005464 



001124 



100): 



1»: 



000001 



2$; 



MOV 


ORCSB.Rl 


:CSRB ADDRESS 


MOV 


RO. IBOADR 


: STORE CSR ADDRESS 


MOV 


WD V I DIR. IGODAT 


{SET UP EXPECTED DATA 


M0V8 


WITO, ICRO J 


;SET DIRECTION BIT 


MOV 


(R0),CR5) 


sGET CSR DATA 


CMP 


IGDDAT ,(R5) 




BEO 


1001 




ERROR * 


2 




MOV 


Rl. IBDADR 


joTORE CSRB ADDRESS 


CLR 


$GODAT 


; STORE EXPECTED 


MOV 


CRl),CR5) 




CMP 


$GDDAT,CR5) 




6EQ 


1$ 




ERROR* 


2 


;CSRB ERROR 


MOV 


RO* IBDADR 


{STORE CSRD ADDRESS 


MOV 


wDt , $GDDAT 


i STORE EXPECTED 


CLRB 


ICRO) 


: CLEAR CSR DIR BIT 


MOV 


CR0).(R5 J 


jREAD CSR 


PHD 






BEQ 


2$ 


i:BR IF EQUAL 


ERROR* 


2 




CLR 


«GODAT 


.EXPECTED 


MOVB 


♦eiTO.KRl) 


;CSRD TO OUTPUT MODE 


MOV 


CR0).(R5) 


sREAD CSR 


CMP 


♦G0DAT.CR5) 


;RDY BIT CLEARED 


BEQ 


TSTIO 


:iBR IF EQUAL 
:CSRD REG ERROR 


ERROR* 


2 



;*TEST 10 
TSTIO: SCOPE 



TEST OBRA U/R IN OUTPUT MODE 



001110 



000001 



II: 



2<: 



JSR 


PC.CLRCSR 


: CLEAR ALL CSRS 


MOV 


«6EGPAT.R5 


iGET DATA PATTERN TABLE 


MOV 


«1».)LPERR 


3 SET UP SCOPE ADDRESS 


MOV 


ORCSA.RO 


{GET CSRA 


MOV 


0R06A.R1 


tGET OBRA ADDRESS 


MOV 


RI.IBDAOR 


: STORE OBRA ADORESS 


MOVB 


♦BITO.ICRO) 


iSET CSRA IN OUTPUT MODE 


MOV 


CR3).»G0DAT 


sSAVE EXPECTED DATA 


CLR 


(Rl) 


s CLEAR OBRA 


BIS 


CR3),(R1) 


iURITE INTO DBRA 


MOV 


CRD.CRS) 


:READ DBRA 


CMP 


«G0DAT.(R5) 


t CHECK U/R DBRA 


BEQ 


2$ 


sNEXT PAT. IF EQUAL 


ERROR « 


2 


tOBRA U/R ERROR 


TST 


(R3)* 


:INC FOR NEXT PATTERN 


CMP 


R3.«ENDDAT 


; CHECK FOR END 


BNE 


It 


iDO NEXT PATTERN 



001110 



;*TEST 11 

fsTll: SCOPE 
JSR 
MOV 
MOV 



TEST DBRB W/R IN OUTPUT MODE 



PC.CLRCSR 

MEGPAT.R3 

iMS.SLPERR 



CLEAR ALL CSRS 

GET DATA PATTERN TABLE 

SET UP SCOPE ADDRESS 



CVORCC OMVll.J CIAl, TS» PRTl 



Til 



TEST OBOB U/R IN OUTPUT MODE 



817 003443 

818 00S446 

819 003452 

820 003456 

821 003464 

822 003470 

823 0034 72 
624 003474 

825 003476 

826 003502 

827 003504 

828 003506 

829 003510 

830 003514 
831 

832 
833 



013700 001346 

013701 001350 
010137 001122 
112760 000001 
011337 001124 
005011 
051311 
011115 

023715 001124 
001401 
104002 
005725 

020327 013572 
001363 





005516 


0C0004 




834 


005520 


004757 


015164 


835 


005524 


012705 


015272 


836 


005530 


012757 


005560 


837 


005556 


015700 


001552 


838 


005542 


015701 


001554 


839 


005546 


010157 


001122 


840 


005552 


112760 


000001 


841 


005560 


011557 


001124 


642 


005564 


005011 




645 


005566 


051511 




844 


005570 


011115 




645 


005572 


025715 


001124 


646 


005576 


001401 




647 


005600 


104002 




648 


005602 


005725 




649 


005604 


020527 


013572 


850 


003610 


001363 




851 








852 








853 









003612 

854 005614 

855 005620 

856 005624 

857 005652 
856 005656 

859 003642 

860 003646 

861 003654 

862 005660 
865 005662 

864 005664 

865 003666 

866 003672 

867 003674 



000004 
004757 
012705 
012757 
015700 
015701 
010157 
112760 
011357 
005011 
051511 
011115 
025715 
001401 
104002 



MACRO M1?00 J/ 


DFC 85 


09:55 PAGE 11 6 




MODE 










MOV 


ORCSB.RO : 


GET CSRB 




MOV 


DRDBB.Rl 


GET D6RB ADDRESS 




MOV 


RI.IBOADR J 


STORE DBRB ADDRESS 


OOOOOl 


MOVB 


^RITO.KRO) J 


SET CSRB IN OUTPUT MODE 


1$: 


MOV 


(R3).$GDDAT j 


SAVE EXPECTED DATA 




CLR 


(Rl) J 


CLEAR DBRB 




BIS 


(R3),(R1) 


WRITE INTO DBRB 




MOV 


CR1).(R5) 


,READ DBRB 




CMP 


$GDDAT.(R5) 


.CHECK U/R DBRB 




BEQ 


2$ 


,NEXT PAT. IF EQUAL 




ERROR* 


2 


;DBRB U/R ERROR 


2» : 


T CT 








CMP 


R3.<«NDDAT 


; CHECK FOR END 




BNE 


1$ 


jDO NEXT PATTERN 


;*TEST 


12 


TEST DBRC U/R IN 


OUTPUT MODE 



%EQ oo;>5 



• ; *****«*««*****«*«***««4i*«**«««**4i*4i**«*********«**4i* *********** 

TST12: 

; CLEAR ALL CSRS 
;GET DATA PATTERN TABLE 
;SET UP SCOPE ADDRESS 
;GET CSRC 
;GET DBRC ADDRESS 
I STORE DBRC ADDRESS 
;SET CSRC IN OUTPUT MODE 
;SAVE EXPECTED DATA 
s CLEAR DBRC 
sURITE INTO DBRC 
;READ DBRC 
; CHECK U/R DBRC 
;NEXT PAT. IF EQUAL 
:DBRC U/R ERROR 
;INC FOR NEXT PATTERN 
s CHECK FOR END 
sDO NEXT PATTERN 



2$: 



SCOPE 




JSR 


PC.CLRCSR 


MOV 


«6EGPAT.R5 


MOV 


»1».ILPERR 


MOV 


DPCSC.RO 


MOV 


DRDBC.Rl 


MOV 


Rl . (BDAOR 


Move 


«BITO.i(RO) 


MOV 


CR5).»G00AT 


CLR 


CRD 


BIS 


CR5).(R1) 


MOV 


(Rl).(R5) 


CMP 


fG00AT.(R5) 


BEQ 


21 


ERROR » 


2 


TST 


(R3)» 


CMP 


R5.«EN00AT 


BNE 


1( 



; *************************************************************** 

*TEST 15 TEST OBRO U/R IN OUTPUT MODE 



015164 
015272 

005654 001110 
001556 
001560 
001122 

OOOOOl OOOOOl 
001124 



001124 



TST15! 



1$: 



SCOPE 

JSR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOVB 

MOV 

CLR 

BIS 

MOV 

CMP 

BEQ 

ERROR » 



PC.CLRCSR 

♦BEGPAT.R5 

«1(,$LPERR 

DRCSD.RO 

DR06D.R1 

RI.IBDADR 

«BIT0.1CR0) 

(R3),$G00AT 

(Rl) 

(R5).(Rl) 
(R1),(R5) 
«GDDAT.(R5) 
2* 

2 



i CLEAR ALL CSRS 
GET DATA PATTERN TABLE 
SET UP SCOPE ADDRESS 
GET CSRD 

;GET OBRD ADDRESS 
: STORE D6RD ADDRESS 
J SET CSRD IN OUTPUT MODE 
J SAVE EXPECTED DATA 

CLEAR OBRD 

WRITE INTO DBRD 

READ DBRD 

CHECK U/R DBRD 

NEX"' PAT, IF EQUAL 

DBRD U/R ERROR 



CVOPCC OPVllJ DIAG TST PPTl MACRO H1200 27 DFC 83 09:55 PAGE II 7 

ri5 TEST OBW) U/R IN OUTPUT MODE 

668 003676 005723 2$: TST CR3)* ;INC TOR NEXT PATTERN 

aC** 003700 020327 0)3572 CMP R3.0EN0DAT 5 CHECK TOR END 

870 003704 001363 BNE 1$ ;00 NEXT PATTERN 



CVO«CC OPVllJ PI*; TST PRTl MACK) N1200 ^'7 OfC 8S 09:55 PHX 
T19 TFST Oeno U/R IN OUTPUT HOOC 



6r2 
8-3 
S74 



I •TEST 



14 



TEST CSR UNIQUENESS. CSRS (A e).(C Oi 





AAV Y t A 


AAAAAA 






TCT 1 A • 
IP' lA : 


CrADF 
pUUrX 






5 ? 


AAA 7 V7 


Aid ^ A 
OlPlD^ 






ICD 


or ri or CD 


• n f- AD Ai 1 rcDc 


A© 
















•TQDA • DA 
;Lphh • HU 


A T 

5 / 
















.rcDn m Di 

; L PHO * HI 


II 7 A 
















tTQDr ■ DO 
SUP^w RC 


A70 
















iTQDn • DX 

twPHU HP 




AA%71 A 
UUd / lA 


1 ic 'OU 




AAAAA1 






wP « 1 V / 


iTCDA AlJTPllT MAAF I /F 


ool 




I Ic 'DP 


UUUUUi 


AAAAA1 




nuvo 


AATTA irQX') 
Vol 1 U • I 






UUP r pu 


A1 fM^X7 
UlUUP 


AAl 1 3^ 
UUl Ice 








DA tRAAnQ 






UUd r 3A 


ftl D7*7 
Uic » P ' 


tAl 7AA 
lUl rUV 


AAl 1 PA 
UUl Ic^ 




HAU 


A1A17AA trJIAAT 
wlVl r WW f 9\M/Wf^ • 


iFXPFrTFA AATA 


AAA 


UU3 r A^ 


A1 1 Ol ^ 
Ul lUlD 










^DA^ TD^^ 






AA V7AA 

UUP f ^ 


TaA 3 71^ 
UA^ f IP 


/WW^7 
\J%J\AAJ f 






OIL. 


V / , \ RP / 


• n FAD iMAFrTMPn RTT<; 


ooo 


UUd r DU 


UcP r ID 


UUi IcA 








tr:nnAT rDS^i 

• UUU" 1 « V WP / 




OO f 


UUP f DA 


UUlAUl 








DCU 


1 • 




AAA 


AAV7^i^ 

uup f dp 


1 AAAA3 
iUAUUc 










c 


vTQDA FDDnO 


AAO 


AAX7iL/) 
UUP ^OU 


A1 ni X7 
UlUlP r 


UUl ice 




It* 


HAU 


D1 tAAAAO 
rvi , 9DUmn 


•rMFTK r^DR 


A<^ 


AAV7AA 
UU3 f OA 


UUDUP f 


AAl 1 DA 
UUl IcA 












A01 


AAV7 7A 

UU3 f fSJ 


A1 1 1 1 A 








HAW 

nuv 


^ D1 > ( D*k ^ 
V HI ; , I Hp ^ 




AQD 


AA V 770 
UU3 f f C 


UcP ' XO 


AAl 1 OA 
UUl IcA 








9UUUM 1 « \ Pfp / 




AOV 


AA V7 7A 

OOP f /o 


AA1 AA1 

OOIAOI 










O t 
c » 




AAA 
OfA 


AAA^^A 

OOAOOO 


IO#OOc 










c 


lUpHD CHWUH 


AQ^ 

Ofj 


UOAOOc 


A 1 A W7 
OIOPP f 


AA 1 1 
UUI Ice 




Ota 

c 9 : 


MAW 

nuv 


DX tnnAAO 

HP, fUU'H^ 




A^^ 


AAA A^^ 

UOAOUo 


A1 57»7 

Q1(C for 


1 AAAAA 
lUOAOU 


AAl 1 OA 
UUllcA 




nuv 


Ai AAAAA trmriAT 

vIUUAUUt 9UUUM I 




897 


004014 










hOV 


CR3).(R5) 




696 


004016 


025715 


001124 






CMP 


IGOOAT.(RS) 




699 


004022 


001401 








BEQ 


5t 




900 


004024 


104002 








ERROR » 


2 


tCSRO ERROR 


901 


004026 


010257 


001122 




31: 


nov 


R2.IB0A0R 


I CHECK CSRC 


902 


004052 


012757 


000200 


001124 




nov 


«eiT7.tG00AT 


t EXPECTED 


903 


004040 


011215 








MOV 


CR2).(RS) 




904 


004042 


042715 


000007 






BIC 


•7.(R5^ 




905 


004046 


025715 


001124 






CMP 


$G00AT,(R5) 




906 


004052 


001401 








BEQ 


TST15 


itBR IF EQUAL 


907 


004054 


104002 








ERROR » 


2 


iCSRC ERROR 


9oa 


















909 



















;*TEST 15 



TEST CSR UNIQUENESS. CSRS (A.O).(C-B) 





004056 


000004 




TST15: 


SCOPE 




910 


004060 


004737 


015164 




JSR 


PC.CLRCSR 


911 














912 














915 














914 














915 


004064 


112760 


000005 


000001 


novB 


•5.1(R0) 


916 


004072 


112761 


000001 


000001 


NOVB 


«eiT0.1(Rl) 


917 


004100 


010057 


001122 




HOV 


RO.IBDAOR 


910 


004104 


012757 


101700 


001124 


HOV 


•101700. tGOOAT 


919 


004112 


011015 






HOV 


(R0).(R5) 


920 


004114 


042715 


000007 




BIC 


47. (R5) 


921 


004120 


025715 


001124 




CMP 


♦G00AT.(R5) 


922 


004124 


001400 






BEQ 


It 



tCLR ALL CSRS 

iCSRA • RO 

iCSRB • Rl 

tCSRC • R2 

iCSRO • R5 

iCSRA OUTPUT. I /E 

iCSRB OUTPUT HOOE 

iCSRA ADDRESS 



(CLEAR UNDEFINED BITS 



CVD«CC n«MlJ CI4i, Tsl PRIl hACRU Ml^OO j: O'C 85 09:55 PAGt l-^ i 
TIS TIST CS« UNIOUtNE'-.C.CSPS (A 0).(C 0) 



925 


004126 


010157 


001 12^* 




1 S : 


MQV 


n« »r>r\ r\r\ 

Wl • loDADH 


jCMtCr CbHo 


924 


004152 


012757 


100400 


001li?4 




MOV 


^100400, IGDuAT 




925 


004140 


011115 








MOV 


( Rl ) • (R5 ^ 




926 


004142 


025715 


001124 






CMP 


•GDDAi , C Ht> ) 




927 


004146 


001401 








BEQ 


21 




926 


004150 


104002 








ERROR • 


2 


jCSRB LRROR 


929 


004152 


010257 


001122 




21 : 


MOV 


H^: • f dUAUH 


S CMtLK t >Rt 


-a 50 


004156 


012757 


000200 


001124 




MOV 






951 


004164 


011215 








MOV 


C R2 ) . ( R5 ) 




952 


004166 


042715 


000007 






BIC 


0 7 , C ) 








\j£ 3 r 














954 


004176 


001401 








BEQ 


5$ 




955 


004200 


104002 








ERROR* 


2 


jCSRC ERROR 


956 


004202 


010557 


001122 




5«: 


MOV 


R5.IB0A0R 




957 


004206 


005057 


001124 






CLR 


IGDOAT 




956 


004212 


011515 








MOV 


(R5).(R5) 




959 


004214 


025715 


001124 






CMP 


IGDOAT. (R5) 




940 


004220 


001401 








BEQ 


TST16 


;sBR If^ EQUAL 
sCSRO ERROR 


941 


004222 


104002 








ERROR » 


2 



<>42 
945 



!*TEST 16 TEST PORT A TO PORT C INTERACTION 





004224 


000004 






TST16: 


SCOPE 






^5 


004226 


004757 


013164 








PC.CLRCSR 


t CLEAR ALL CSRS 


946 


004252 


012705 


015272 






MOV 


«BEGPAT.R3 


iGET DATA PATTERN TABLE 


947 


004256 


012757 


004266 


001110 




MOV 


•II.ILPERR 


;SET UP SCOPE AOORESS 


946 


004244 


015700 


001542 






MOV 


ORCSA.RO 


(GET PORT A. CSRA AOORESS 


949 


004250 


013701 


001552 






nov 


ORCSC.Rl 


iGET PORT C. CSRC ADDRESS 


950 


004254 


015702 


001546 






HOV 


0RCSB.R2 


iCSRB AOORESS 


951 


004260 


112762 


000001 


000001 




MOVB 


«6IT0.1CR2) 


tCSRB IN OUTPUT MODE 


952 


004266 


010037 


001122 




1<: 


MOV 


RO.tBOAOR 


(STORE CSRA AOORESS 


955 


004272 


005062 


000002 






CLR 


2CR2) 


t CLEAR D6RB 


954 


004276 


105061 


000001 






CLRB 


l(Rl) 


iPORT C. CSRC. INPUT MODE 


955 


004502 


112760 


000001 


000001 




MOVB 


•BITO.KRO) 


J SET CSRA IN OUTPUT MODE 


956 


004510 


011560 


000002 






MOV 


(R5).2(R0) 


i WRITE INTO 06RA 


957 


004514 


016104 


000002 






MOV 


2(R1).R4 


iREAD D6RC 


958 


004520 


012737 


100700 


001124 




MOV 


•R0Y!0IR!BIT7!BIT6. IGDOAT 


959 














tCSRA DIR SHOULD STAY SET 


960 


004526 


011015 








MOV 


(R0).(R5) 


tREAO CSRA 


961 


004550 


042715 


000007 






BIC 


♦7,(R5) 


iCLEAR UNDEFINED BITS 


962 


004554 


025715 


001124 






CMP 


•GOOAT.(RS) 




965 


004540 


001401 








BEQ 


100$ 




964 


004542 


104002 








ERROR* 


2 


tCSRA ERROR 


965 


004544 


012737 


000200 


001124 


100$: 


MOV 


«BIT7.tG0DAT 




966 


004552 


010157 


001122 






MOV 


RI.IBOAOR 


tCSRC ADDRESS 


967 


004556 


011115 








MOV 


CR1).(R5) 


(READ CSRC 


960 


004560 


042715 


000007 






BIC 


♦7.CR5) 


t CLEAR UNDEFINED BITS 


969 


004564 


025715 


001124 






CMP 


tG00AT.CR5) 




970 


004570 


001401 








BEQ 


101 1 




971 


004572 


104002 








ERROR* 


2 


tCSRC ERROR 


972 


004574 


015757 


001554 


001122 


lOlt: 


MOV 


DROBC . *BDAOR 


(STORE DBRC ADDRESS 


975 


004402 


011557 


001124 






MOV 


(R5).tGDDAT 


J SAVE EXPECTED 


974 


004406 


010415 








MOV 


R4.(R5) 


iOBRC CONTENTS 


975 


004410 


025715 


001124 






CMP 


«G00AT.(R5) 


8 CHECK PORT C.08RC 


976 


004414 


001401 








BEQ 


21 


jBFQ TO NEXT SUBTEST 



JO^'C WVllJ CIAi; IS' PR! I ^ACRO HIPOO J 
Its TfrST PORT A TO POR^ C INTERACTION 



2ft: 



97 ; 


004416 


104002 




^^6 


004420 


005137 


001124 


979 








980 


004424 


013737 


001344 


961 


004452 


013761 


001124 


982 


004440 


105060 


000001 


98S 


004444 


112761 


000001 


^84 


004452 


016015 


000002 


985 


00^456 


023715 


001124 


986 


004462 


001401 




987 


004464 


104002 




988 


004466 


013737 


001350 


989 004474 


005037 


001124 


990 


004500 


016215 


000002 


991 


004504 


023715 


001124 


992 


004510 


001401 




993 


004512 


104002 




994 


004514 


005723 




995 


004516 


020327 


013572 


996 


004522 


001261 




997 








998 








999 









1000 
1001 
1002 
1003 
1004 
1005 
1006 
1007 

looa 

1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 

loia 

1019 
1020 
1021 
1022 
1023 
1024 
1025 
1026 
1027 
1028 
1029 
1030 



004524 
004526 
004532 
004536 
004544 
004550 
004554 
004560 
004566 
004572 
004576 
004602 
004610 
004614 
004620 
004626 
004630 
004634 
004636 
004640 
004644 
004650 
004652 
004656 
004660 
004662 
004670 
004674 
004676 
004702 
004704 
004706 



000004 
004737 
012703 
012737 
013700 
013701 
013702 
112762 
010037 
005062 
105061 
112760 
011360 
016104 
012737 
011015 
023715 
001401 
104002 
005037 
010137 
011115 
023715 
001401 
104002 
013737 
011337 
010415 
023715 
001401 
104002 
005137 



013164 
013272 
004566 
001346 

001356 
001342 
000001 
001122 
000002 
000001 
000001 
000002 
000002 
100400 

001124 



001124 
001122 

001124 



001360 
001124 

001124 



001124 



001122 
000002 St: 

000001 



001122 4$: 



51: 



;*TEST 

s t 
TST17: 



001110 

000001 

000001 
001124 



It: 



1001: 



001122 101 t: 



2t: 



OFC «3 «y»:55 P«G£ U> ? 



ERROR* 


2 


;DBRC REG ERROR 


con 


ftGOOAT 


iSET UP TO WRITE COM DATA » P )M 






iPORT C TO PORT A 


MOV 


0R06A, IBDADR 


5 STORE DBRA ADDRESS 


MOV 


IG00AT.2CR1) 


;URITE PORT C.I^^UT MQDF 


Cl R6 


ICRO) 


J MAKE PORT A INPUT MOOE 


MOVB 


oeiTO. ICRl > 


iMAKE PORT C OUTPUT MOOE 


MOV 


2CR0). R5) 


tPEAO PORT A.D6RA 


CMP 


IGD0AT.CR5) 


jPORT A -PORT C? 


BEQ 


4$ 


tCMECK 06RB FOR NO DATA CHANGE 


ERROR » 


2 


tPORT A. DBRA REG ERROR 


HUV 


DHUDO • loDADH 


jbiUNt UBRd AUUHtbb 


CLR 


IGDOAT 


I CONTENTS SHOULD STAr ZERO 


MOV 


2CR2).(R5) 


sREAO DBRB TOR CLEAR 


CMP 


IGOOAT.CRS) 


t CHECK FOR DBRB CLEAR 


BEQ 


5$ 


lYES. CONTINUE 


ERROR » 


2 


:DBRB INTERACTION ERROR 


TST 


CR3)* 


5 INC FOR NEXT PATTERN 


CMP 


R3.^NDDAT 


; CHECK FOR END 


BNE 


11 


tDO NEXT PATTERN 



17 TEST PORT B TO PORT D INTERACTION 



SCOPE 






JSR 


PC.CLRCSR 


(CLEAR ALL CSRS 


HOV 


«eEGPAT.R3 


(GET DATA PATTERN TABLE 


MOV 


#1$.ILPERR 


{SET UP SCOPE ADDRESS 


nov 


ORCSB.RO 


iGET PORT B. CSR6 ADDRESS 


nov 


ORCSO.Rl 


(GET PORT 0. CSRD ADDRESS 


HOV 


0ftCSA.R2 


1 STORE CSRA ADDRESS 


novB 


«eiT0.1(R2) 


:CSRA IN OUTPUT MODE 


HOV 


R0.I6DA0R 


: STORE CSR6 ADDRESS 


CLR 


2(R2) 


{CLEAR DBRA 


clrb 


l(Rl) 


jPORT D. CSRD, INPUT MODE 


HOVB 


•eiTO.KRO) 


{SET CSR8 IN OUTPUT MODE 


MOV 


(R3).2(R0) 


tURITE INTO DBRB 


MOV 


2(Rl).R4 


iDBRD CONTENTS 


MOV 


«RDY!OIR.<GDOAT 


tSAVE EXPECTED 


MOV 


(R0).(R5) 


tREAO CSRB 


CMP 


»G0DAT.(R5) 




BEQ 


loot 




ERROR » 


2 


iCSRB ERROR 


CLR 


tGOOAT 


{SAVE EXPECTED 


HOV 


Rl.tBDAOR 


(SAVE CSRD ADDRESS 


HOV 


(R1).(R5) 




CMP 


tGOOAT. (R5) 




BEQ 


101 1 




ERROR* 


2 


(CSRD ERROR 


MOV 


OROBD.tBDAOR 


(SAVE D6R0 ADDRESS 


MOV 


CR3), tGOOAT 


(SAVE EXPECTED 


MOV 


R4.(R5) 


iOBRD CONTENTS 


CMP 


tGOOAT. (R5) 


: CHECK PORT D.DBRD 


BEQ 


2t 


:BEQ TO NEXT SUBTEST 


ERROR* 


2 


iDBRD REG ERROR 


COM 


tGDDAT 


sSFT UP TO URITE COM DATA 



CVWCC WVUJ PIAi; TSI PRTl 



MACRO N1?00 



Ti: TEST PORT B TO POP' 0 INTERACTION 



001122 
000002 Si I 

000001 



001122 4$: 



1 Alt 1 








1 A 


SJSJ^ 9 \£ 


Al X7X7 


AA1 X^A 






A1 X7l^1 


AA1 1 PA 


1 






AAAAA1 


1 (\%% 




11^ 71^ 1 


AAAAA1 


1 O Vft 

i 


AAA 7^0 




AAAAAP 


1 

i V J • 


AAA7AA 




AA1 1PA 


1 OXA 

1^' JO 


AAA7^A 


AA1 






AAA7^P 

' Jc 


1 AAAAP 




1 AAA 


AAA7U 


At X717 


AAt XAA 


1 AAI 














000002 


104S 


004772 


025715 


001124 


1044 


004776 


001401 




1045 


005000 


104002 




1046 


005002 


005725 




1047 


005004 


02C527 


013S72 


1046 


005010 


001266 




1049 








1050 








1051 









1052 
1055 
1054 
1055 
1056 
1057 
1056 
1059 
1060 
1061 
1062 
1065 
1064 
1065 
1066 
1067 
1066 
1069 
1070 
1071 
1072 
1075 
1074 
1075 
1076 
1077 
1076 
1079 
1060 
1061 
1062 
1065 
1064 



005012 
005014 
005020 
005024 
005052 
005056 
005042 
005046 
005054 
005060 
005064 
005070 
005076 
005102 
005106 

005114 
005116 
005122 
005126 
005150 
005152 
005140 
005144 
005146 
005152 
005156 
005160 
005162 
005170 
005174 
005176 
005202 
005204 



000004 
004757 
012705 
012757 
015700 
015701 
015702 
112762 
010057 
005062 
105061 
112760 
011560 
016104 
012757 

011015 
042715 
025715 
001401 
104002 
012757 
010157 
011115 
042715 
025715 
001401 
104002 
015757 
011557 
010415 
025715 
001401 
104002 



013164 
013272 
005054 
001552 
001542 
001356 
000001 
001122 
000002 
000001 
000001 
000002 
000002 
100600 



000007 
001124 



000300 
001122 

000007 
001124 



001344 
0011^4 

001124 



5*: 



• * 

:*TEST 



TST20: 



001110 

000001 

000001 
001124 



001124 loot: 



001122 101$: 
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^EQ 0090 







•PORT D TO PORT B 


fiOv 


DRDfiB $ BO ADR 


: STORE DBRB ADDRESS 




IGDDAT .2(R1 ) 


xURITE PORT D. INPUT MODE 


CL RR 


l(RO) 


iMAKE PORT B INPUT MODE 




MITO ICRIJ 


:MAKE PORT D OUTPUT MODE 


MOV 


2CR0).f R5) 


iREAD PORT B.DBRB 


CMP 




;PORT B "PORT D? 


6EQ 


4$ 


: CHECK OBRA FOR NO DATA CHANGE 


ERROR ♦ 


2 


:PORT B.DBRB REG ERROR 


MOV 


DRDBA.SBDADR 


8 STORE DBRA ADDRESS 


CLR 


$ GOO AT 


; CONTENTS - 0 


MOV 


2Cn2).CR5) 


{READ DBRA FOR CLEAR 




$G00AT.(R5) 


;D6RA CLEAR? 


BEQ 


5S 


; YES. CONTINUE 


ERRORS 


2 


I DBRA INTERACTION ERROR 


TST 


(R3)* 


;INC FOR NEXT PATTERN 


CMP 


R3.^N0DAT 


; CHECK FOR END 


BNE 


It 


;D0 NEXT PATTERN 



20 TEST PORT C TO PORT A INTERACTION 



SCOPE 






JSR 


PC.CLRCSR 


t CLEAR ALL CSRS 


MOV 


«6EGPAT.R5 


tGET DATA PATTERN TABLE 


MOV 


n$.$LPERR 


t SET UP SCOPE ADDRESS 


MOV 


ORCSC.RO 


iGET PORT C. CSRC ADDRESS 


MOV 


ORCSA.Rl 


tGET PORT A. CSRA ADDRESS 
1 STORE CSRD ADDRESS 


MOV 


DRCS0.R2 


MOVB 


«eiT0.1(R2) 


jCSRD in OUTPUT MODE 


MOV 


RO.IBOAOR 


t STORE CSRC ADDRESS 


CLR 


2(R2) 


1 CLEAR DBRD 


CLRe 


ICRl) 


;PORT A. CSRA. INPUT MODE 


MOVB 


«eiT0.1(R0) 


{SET CSRC IN OUTPUT MODE 


MOV 


CR5).2(R0) 


iURITE INTO DBRC 


MOV 


2(R1).R4 


iREAD DBRA 


MOV 


•ROY !0IR 'BIT / . $GDDAT 






iCSRC DIR SHOULD BE SET 


MOV 


(R0).CR5) 


iREAD CSRC 


BIC 


♦7.(R5) 


t CLEAR UNDEFINED BITS 


CMP 


IG00AT,(R5) 




BEQ 


loot 




ERROR* 


2 


iCSRC ERROR 


MOV 


«BIT7!BIT6.tG00AT 


MOV 


Rl.tBDAOR 


(CSRA ADDRESS 


MOV 


(Rl),(R5) 


iREAD CSRA 


BIC 


♦7.(R5) 


(CLEAR UNDEFINED BITS 


CMP 


tGOOAT.(RS) 




BEQ 


101 1 




ERROR* 


2 


iCSRA ERROR 


MOV 


DROBA.tBDAOR 


t STORE DBRA ADDRESS 


MOV 


(R5).tG00AT 


I SAVE EXPECTED 


MOV 


R4.(R5) 


iOBRA CONTENTS 


CMP 


tG00AT.(R5) 


(CHECK PORT A, DBRA 


BEQ 


2t 


(BEQ TO NEXT SIJBTEST 


ERROR* 


2 


sORRA REG ERROR 



CVDRCC DPVllJ CI at; TST PRTl 



HfKCRO HIPOO j: O^C 85 09:55 PAGE 12 4 



TEST PORT C TO PC^^ A INTERACTION 



SCQ OOSl 



1065 00>?06 


005157 


001124 






COM 


IGDOAT 


1086 














1087 005212 


015757 


001554 


001122 




MOV 


DRDBC • SBDADR 


1088 0O5220 


015761 


001124 


000002 


5» : 


MOV 


>GOOAT , 2( Rl J 


1089 005226 


105060 


000001 






CLRB 


1(R0 ; 


1090 005252 


112761 


000001 


000001 




MQVB 


WHO, 1( RI ; 


1091 005240 


016015 


000002 






MOV 


2( RO ) • C Rd ) 


1092 0052*4 


025715 
001401 


001124 






CMP 


• bODAT , V Rd ; 


1093 005250 










49 




104002 








tHKUW ♦ 


2 


1095 005254 


013737 


001360 


001122 


41 : 


MUV 


UROBD« IdOAOR 


1096 005262 


005037 


001124 






CLH 


* r*Dr\ A T 


1097 005266 


016215 


000002 






MOV 


2(R2).CR5) 


1098 005272 


025715 


001124 






CMP 


$G0DAT.CR5) 


1099 00S276 


001401 








BEG 


5i 


1100 005300 


104002 








ERROR » 


2 


1101 005302 


005725 






5$: 


TST 


(R5)^ 


1102 005304 


020527 


015572 






CMP 


R5.^ND0AT 


1103 005310 


001261 








BNE 


1$ 


1104 














1105 








;*TEST 


21 


TEST PORT 0 



sSET UP TO WRITE COM DATA rRQM 
jPORT A TO PORT C 

STORE DBRC ADDRESS 

WRITE PORT A, INPUT MODE 

MAKE PORT C INPUT MODE 

MAKE PORT A OUTPUT MODE 
jREAD PORT CDBRC 

PORT C -PORT A? 

CHECK DBRO FOR NO DATA CHANGE 

PORT C.DBRC REG ERROR 

STORE DBRD ADDRESS 

DBRD • 0 EXPECTED 

READ DBRD FOR CLEAR 
J IS DBRD CLEAR? 
J YES. CONTINUE 
J DBRD INTERACT I0r4 ERROR 

INC FOR NEXT PATTERN 

CHECK FOR END 

00 NEXT PATTERN 





005312 


000004 






tST21 • 


SCOPE 






1106 


005314 


004737 


013164 






JSR 


PC CLRCSR 


•CLEAR ALL CSRS 


1107 


005320 


012703 


013272 






MOV 


«eEGPAT,R3 


iGET DATA PATTERN TABLE 


1106 


005324 


012737 


005354 


001110 




MOV 


«1«.»LPERR 


iSET UP SCOPE ADDRESS 


1109 


005332 


013700 


001356 






MOV 


ORCSO.RO 


:GET PORT 0. CSRD ADDRESS 


1110 


005336 


013701 


001346 






MOV 


ORCSB.ftl 


iGET PORT B. CSRB ADDRESS 


1111 


005342 


013702 


001352 






MOV 


0RCSC.R2 


1 STORE CSRC ADDRESS 


1112 


005346 


112762 


000001 


000001 




MOVB 


•eiT0.1(R2) 


jCSRC in OUTPUT MODE 


1113 


005354 


010037 


001122 






MOV 


RO.IBOAOR 


{STORE CSRO ADDRESS 


1114 


005360 


005062 


000002 






CLR 


2(R2) 


(CLEAR DBRC 


1115 


005364 


105061 


000001 






CLRB 


KRl) 


J PORT B. CSRB. INPUT MODE 


1116 


005370 


112760 


000001 


000001 




MOVB 


♦eiTO.KRO) 


iSET CSRD IN OUTPUT MODE 


1117 


005376 


011360 


000002 






MOV 


(R3).2(R0) 


iURITE INTO DBRD 


1118 


005402 


016104 


000002 






MOV 


2(R1) R4 


{READ DBRB 


1119 005406 


012737 


100400 


001124 




MOV 


«fiOY!6lR.fGOOAT 


(SAVE EXPECTED 


1120 


005414 


011015 








MOV 


(R0).(R5) 


(READ CSRD 


1121 


005416 


023715 


001124 






CMP 


tGODAT.CRS) 


1122 


005422 


001401 








BEQ 


100» 




1123 


005424 


104002 








ERRORS 


2 


tCSRD ERROR 


1124 


005426 


005037 


001124 




100<: 


CLR 


IGOOAT 


sSAVE EXPECTED 


1125 005432 


010137 


001122 






MOV 


RI.IBOAOR 


tSAVE CSRB ADDRESS 


1126 


005436 


011115 








MOV 


(R1).(R5) 




1127 


005440 


023715 


001124 






CMP 


IGOOAT.(RS) 




1128 005444 


001401 








BEQ 


lOlt 




1129 005446 


104002 








ERROR ♦ 


2 


:CSR6 ERROR 


1130 


005450 


013737 


001350 


001122 


101 <: 


MOV 


OPOBB.<BOAOR 


iSAVE DBRB ADDRESS 


1131 


005456 


011337 


001124 






MOV 


(R3).$G00AT 


iSAVE EXPECTED 


1132 


005462 


010415 








MOV 


R4,(R5) 


iDBRB CONTENTS 


1133 


005464 


023715 


001124 






CMP 


tGODAT.CRS) 


i CHECK PORT B.DBRB 


1134 


005470 


001401 








BEQ 


21 


:BEa TO NEXT SUBTEST 


1135 


005472 


104002 








ERRORS 


2 


iDBRB REG ERROR 


1136 


005474 


005137 


001124 




2$: 


COM 


IGOOAT 


:SET UP TO WRITE COM DATA 


1137 
















:PORT B TO PORT D 


1138 


005500 


015737 


001360 


001122 




MOV 


ORDBD.SBOAOR 


i STORE DBRD ADDRESS 



CVOPCC OPVllJ CIAli TS» PPT I MACRO Ml?00 J" OFC 83 0S:55 PAGE 12 5 
T£l TEST PORT 0 TO P0«* B INTERACTION 



11 39 


005506 


015761 


001124 


000002 


5$: 


HOV 


IG00AT,2(R1) 


{WRITE PORT 8. INPUT MODE 


1140 


005514 


105060 


000001 






CLRB 


l(RO) 


{MAKE PORT D INPUT MODE 


1141 


005520 


112761 


000001 


000001 




novB 


♦eiTO.l(Rl) 


}MAKE PORT B OUTPUT MODE 


1142 


005526 


016015 


000002 






MOV 


2(R0).(R5) 


sREAO PORT O.OBRO 


1145 


005552 


025715 


001124 






CMP 


<GODAT.(RS} 


:PORT B -PORT D? 


1144 


005556 


001401 






BEQ 


4t 


: CHECK DBRC FOR NO O'^TA CHANGE 


1145 


005540 


104002 








ERROR* 


2 


iPORT D.OBRD REG ERROR 


1146 


005542 


015757 


001554 


001122 


4t: 


MOV 


ORDBC.tBDADR 


: STORE OBRC ADDRESS 


1147 


005550 


005057 


001124 






CLR 


<GODAT 


: EXPECT OBRC • 0 


1140 


005554 


016215 


000002 






MOV 


2(R2).CR5) 


(READ DBRC 


1149 


005560 


025715 


001124 






CMP 


«G00AT,(R5) 


:IS DBRC - 0 


1150 


005564 


001401 








BEQ 


51 


t YES. CONTINUE 


1151 


005566 


104002 








ERROR* 


2 


lOBRC INTERACTION ERROR 


1152 


005570 


005725 






5$: 


TST 


(R5)* 


(INC FOR NEXT PATTERN 


1153 


005572 


020527 


015572 






CMP 


R5,«EN00AT 


i CHECK FOR END 


1154 


005576 


001266 








BNE 


11 


iDO NEXT PATTERN 



1155 



1156 






















J •TEST 


22 


TEST GROUP 1 


.2 IMR.IRR.ACR WITH CHIP RESET 




005600 


000004 




TST22: 


SCOPE 






1157 


005602 


004757 


015164 




JSR 


PC.CLRCSR 


J CLEAR ALL CSRS 


1156 


005606 


012702 


000002 




MOV 


•2.R2 


J TWO GROUPS TO TEST 


1159 


005612 


015700 


001542 




MOV 


ORCSA.RO 


1 STORE CSRA 


1160 


005616 


015701 


001546 




MOV 


DRCSB.Rl 


{STORE CSRB 


1161 


005622 


004757 


015254 




JSR 


PC.CLRIRR 


1 CLEAR IRR REGISTERS 


1162 


005626 


010137 


001122 


1111: 


MOV 


R1.I6DADR 


{STORE ADDRESS 


lloS 


005652 


012737 


000077 001124 




nov 


wsll , «uUUn 1 




1164 


005640 


112710 


000244 




MOVB 


«MIMR.(RO) 


{LOAD MODE BITS FOR IMR 


1165 


005644 


111115 






MOVB 


(R1),(R5) 


{READ IMR REGISTER 


1166 


005646 


025715 


001124 




CMP 


IGDDAT.(R5) 




1167 


005652 


001401 






BEQ 


1« 




1168 


005654 


104005 






ERROR* 


5 


{IMR REG ERROR 


1169 


005656 


005057 


001124 


1>: 


CLR 


IGDOAT 


{STORE EXPECTED 


1170 


005662 


112710 


000250 




MOVB 


«MIRR,(RO) 


(LOAD MODE BITS FOR IRR 


1171 


005666 


111115 






MOVB 


<R1).<R5) 


(READ IRR REGISTER 


1172 


009670 


025715 


001124 




CMP 


IGOOAT.(RS) 




117S 


005674 


001401 






BEQ 


2« 




1174 


005676 


104005 






ERROR* 


5 


(IRR REG ERROR 


1175 


005700 


112710 


000254 


2>: 


MOVB 


«MACR.(RO) 


(LOAD MODE BITS FOR ACR 


1176 


005704 


111115 






MOVB 


(RD.CRS) 


(READ ACR REGISTER 


1177 


005706 


025715 


001124 




CMP 


«GDDAT.(RS) 




1176 


005712 


001401 






BEQ 


5( 




1179 


005714 


104004 






ERROR* 


4 


(ACR REG ERROR 


1180 


005716 


005502 




5t: 


DEC 


R2 


(FINISHED BOTH GROUPS? 


1181 


005720 


001405 






BEQ 


TST25 


({BR IF EQUAL 


1182 


005722 


015700 


001552 




MOV 


DRCSC.RO 




1185 


005726 


015701 


001556 




MOV 


DRCSD.Rl 




11A4 


005752 


000755 






BR 


lilt 




1165 
















1166 
























i*TEST 


25 


TEST GROUPS 


1 AND 2 ACR UNIQUENESS 




005754 


000004 




TST25: 


SCOPE 






1187 


005756 


0O4757 


015164 




JSR 


PC.CLRCSR 


(CLEAR ALL CSRS 


1166 


005742 


015700 


001542 




MOV 


DRCSA.RO 


(CSRA ADDRESS 


1189 


005746 


015701 


001546 




MOV 


DRCSB.Rl 


:CSRB ADDRESS 
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r^5 TFST GROUPS 1 AND 2 ACR UNIQUENESS 



11^ 005752 


012703 


000002 






HOV 


02. R3 


ll^^l 005756 


004 737 


013234 






JSR 


PCCLRIRR 


1192 005762 


010137 


001122 




llli; 


HOV 


Rl. IBDADR 


1193 005766 


012737 


000252 


001124 




MOV 


♦252, IGODAT 


1194 005774 


112710 


000254 






HOvB 


^ACR.(RO) 


1195 006000 


112710 


000300 






HQVB 


♦PACR.CRO) 


1196 006004 


113711 


001124 






Move 


$GDDAT.(R1) 


1197 006010 


111115 








Movr 


(RD.CRS) 


1196 006012 


023715 


001124 






CK 


IGD0AT,CR5) 


1199 006016 


001401 








BEQ 


1$ 


1200 006020 


104004 








ERRORS 


4 


1201 006022 


112710 


000244 




li: 


MOVB 


OMIMR.CRO^ 


1202 006026 


012737 


000377 


001124 




MOV 


♦377.$G0DAT 


1203 0060S4 


111115 








MOVB 


(RD.CRS) 


1204 006036 


023715 


001124 






CMP 


IGDOAT.CRS) 


1205 006042 


001401 








BEQ 


2$ 


1206 006044 


104005 








ERROR ♦ 


5 


1207 006046 


112710 


000240 




21: 


MOVB 


OMISR.CRO) 


1206 006052 


005037 


001124 






CLR 


IGDDAT 


1209 006056 


111115 








MOVB 


(R1).(R5) 


1210 006060 


023715 


001124 






CMP 


IGDDAT »(R5) 


1211 006064 


001401 








BEQ 


3$ 


1212 006066 


104006 








ERRORS 


6 


1213 006070 


112710 


000250 




31: 


MOVB 


^IRR.(RO) 


1214 006074 


111115 








MOVB 


(Rl).(R5) 


1215 006076 


023715 


001124 






CMP 


IGDDAT. (R5) 


1216 006102 


001401 








BEQ 


41 


1217 006104 


104003 








ERRORS 


3 


1216 006106 


105010 






4$: 


CLRB 


(RO) 


1219 006110 


112710 


000254 






MOVB 


«MACR,(RO) 


1220 006114 


111115 








MOVB 


(R1).(R5) 


1221 006116 


023715 


001124 






CMP 


IGDOAT.CRS) 


1222 006122 


001401 








BEQ 


5$ 


1223 006124 


104004 








ERRORS 


4 


1224 006126 


005303 






5$: 


DEC 


R3 


lC4fD OOd150 


001405 








BEQ 


TST24 


1226 006132 


013700 


001352 






MOV 


DRCSC.RO 


1227 006136 


013701 


001356 






MOV 


ORCSD.Rl 


1226 006142 


000707 








BR 


1111 


1229 












1230 






















;*TEST 


24 


TEST GROUPS 


006144 


000004 






TST24: 


SCOPE 




1231 








; ;GPA 


JSR 


PC.CLRCSR 


1232 006146 


004737 


013234 




JSR 


PCCLRIRR 


1233 006152 


013700 


001342 






MOV 


DRCSA.RO 


1234 006156 


013701 


001346 






MOV 


DRCSB.Rl 


1235 006162 


012703 


000002 






MOV 


♦2tR3 


1256 006166 


010137 


001122 




111$; 


MOV 


RI.IBDADR 


1237 006172 


012737 


000252 


001124 




MOV 


♦252. IGDDAT 


1236 006200 


112710 


000244 






MOVB 


♦MIMR.(RO) 


1239 006204 


112710 


000260 






MOVB 


♦PIMR.(RO) 


1240 006210 


113711 


001124 






MOVB 


IGDDAT. (Rl) 


1241 006214 


111115 








MOVB 


(R1).(R5) 


1242 006216 


023715 


001124 






CMP 


IGDDAT, (R5) 


1243 006222 


001401 








BEQ 


11 



6 



SEQ 00^; 



; COUNTER FOR TESTING TWO GROUPS 
s CLEAR IRR REGS WITH CMlP RESET 
s STORE ADDRESS 

; store expected 
;loao mode bits for acr 
; preselect acr for writing 
;write into data port 
5 store data for compare 
; check acr results 

Iac^ error 

s change to imr register 
; store expected 

;READ IMR 

s SHOULD STILL BE ALL I'S 

;IMR REG ERROR 

:LOAD MODE BITS FOR ISR 

; STORE EXPECTED 

{HEAD ISR 

sISR SHOULD BE CLEARED 

;ISR REG ERROR 

sLOAD MODE BITS FOR IRR 

8 READ IRR 

I IRR SHOULD BE CLEARED 

sIRR REG ERROR 
{CHIP RESET GROUP 1 
{LOAD MODE BITS FOR ACR 
I READ ACR 

;ACR SHOULD BE CLEARED 

I ACR REG ERROR 

{TEST GROUPS 1 AND 2 

; }BR IF BOTH CROUPS TESTED 

; GROUP 2 CONTROL PORT 

sGROUP 2 DATA PORT 

J TEST GROUP 2 ACR UNIQUENESS 



AND 2 IMR UNIQUENESS 



; CLEAR ALL CSRS 

SI VDRCAl CHANGES THIS ;;GPA 

iCSRA ADDRESS 
{CSRB ADDRESS 

; COUNTER FOR TWO GROUP TESTING 
{STORE ADDRESS 
{STORE EXPECTED 
{LOAD MODE BITS FOR IMR 
.•PRESELECT IMR FOR WRITING 
J WRITE INTO DATA PORT 
{STORE DATA FOR COMPARE 
{CHECK IMR RESULTS 
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T^4 TEST CDOUPS 1 AND C IMR UNIQUENESS 



1?44 


006224 


104005 








ERROR « 


5 


1245 


006226 


112710 


000254 




11: 


MQVB 


OMACR.CRO) 


1246 


006232 


005037 


001124 






CLR 


IGDDAT 


1247 


006236 


111115 








MOVB 


(R1).(R5) 


1246 


006240 


023715 


001124 






CMP 


$GDDAT.(R5) 


1249 


006244 


001401 








BEQ 


2$ 


1250 


006246 


104004 








ERRORS 


4 


1251 


006250 


112710 


000240 




2S: 


MOVB 


4WISR.CR0) 


1252 


006254 


111115 








MOVB 


(R1).(R5) 


1255 


006256 


023715 


0O1124 






CMP 


$G00AT.(R5) 


1254 


006262 


001401 








BEQ 


3$ 


1255 


006264 


104006 








ERROR » 


6 


1256 


006266 


112710 


000250 




3S: 


MOVB 


«MIRR.(RO) 


1257 


006272 


111115 








MOVB 


(R1).(R5) 


1256 


006274 


023715 


001124 






CMP 


IG00AT.(R5) 


1259 


006300 


001401 








BEQ 


4$ 


1260 


006302 


104003 








ERROR ♦ 


3 


1261 


006304 


105010 






4$: 


CLRB 


(RO) 


1262 


006306 


112710 


000244 






MOVB 


♦MIMR.(RO) 


1263 


006312 


012737 


000377 


001124 




MOV 


♦377.IGD0AT 


1264 


006320 


111115 








MOVB 


(R1).(R5) 


1265 


006322 


023715 


001124 






CMP 


IGDDAT •(R5) 


1266 


006326 


001401 








BEQ 


51 


1267 


006330 


104005 








ERRORS 


5 


1268 


006332 


005303 






5$ : 


DEC 


R3 


1269 


0063S4 


001405 








BEQ 


TST25 


1270 


006336 


013700 


001352 






MOV 


DRCSC.RO 


1271 


006S42 


013701 


001356 






MOV 


ORCSO.Rl 


1272 


006346 


000707 








BR 


llli 


1273 
















1274 


























;*TEST 


25 


TEST GROUPS 




006350 


000004 






TST25: 


SCOPE 




1275 


006352 


004737 


013164 






JSR 


PC.CLRCSR 


1276 


006356 


013700 


001342 






MOV 


ORCSA.RO 


1277 


006362 


013701 


001346 






MOV 


ORCSB.Rl 


1278 


006366 


012703 


000002 






MOV 


«2.RS 


1279 


006372 


004737 


013234 






JSR 


PC.CLRIRR 


1280 


006376 


010137 


001122 




1111: 


MOV 


RI.IBOAOR 


1281 


006402 


012737 


000200 


001124 




MOV 


•200.IG00AT 


1282 


006410 


112710 


000250 






MOVB 


•niRR.(RO) 


1283 


006414 


112710 


000137 






MOVB 


«137.(R0) 


1284 


006420 


111115 








MOVB 


(Rl).(RS) 


1285 


006422 


023715 


001124 






CMP 


IGOOAT.(RS) 


1286 


006426 


001401 








BEQ 


It 


1287 


006430 


104003 








ERROR* 


3 


1288 


006432 


112710 


000244 




1$: 


MOVB 


•MIMR.CRO) 


1289 


006436 


012737 


000377 


001124 




MOV 


«577.»G00AT 


1290 


006444 


111115 








MOVB 


(Rl).<R5) 


1291 


006446 


023715 


001124 






CMP 


(G00AT.(R5) 


1292 


006452 


001401 








BEQ 


21 


1293 


006454 


104005 








ERROR ♦ 


5 


1294 


006456 


112710 


000240 




2$: 


MOVB 


«t1ISR.(R0) 


1295 


006462 


005037 


001124 






CLR 


(GOOAT 


1296 


006466 


111115 








MOVB 


(Rl).(R5) 


1297 


006470 


023715 


001124 






CMP 


$GOOAT.(RS) 



:IMR ERROR 

{CHANGE TO ACR REGISTER 
{STORE EXPECTED 
'READ ACR 

: SHOULD STILL BE CLEARED 

lACR REG ERROR 

:LOAD MODE BITS FOR ISR 

:READ ISR 

ilSR SHOULD BE CLEARED 

:ISR REG ERROR 

iLOAO MODE BITS FOR IRR 

I READ IRR 

iIRR SHOULD BE CLEARED 

I IRR REG ERROR 
;CHIP RESET GROUP 1 
{LOAD MODE BITS FOR IHR 
t STORE EXPECTED 
tREAO IMR 

:IMR SHOULD BE ALL ONES 

;00 NEXT GROUP 

;IMR REG ERROR 

tOO GROUPS 1 AND GROUP 2 

i tBR IF BOTH GROUPS TESTED 

iSET UP TO TEST GROUP 2 

i GROUP 2 DATA PORT 

iOO GROUP 2 IMR UNIQUENESS 



AND 2 IRR UNIQUENESS 



CLEAR ALL CSRS 
CSRA ADDRESS 
CSR6 ADDRESS 

COUNTER FOR fESTING TUO GROUPS 

CLEAR IRR REGS UITH CHIP RESET 

STORE ADORESS 

STORE EXPECTED 

LOAD MODE BITS FOR IRR 

SET SINGLE IRR BIT? 

STORE DATA FOR COMPARE 

CHECK IRR RESULTS 

IRR ERROR 

CHANGE TO IMR REGISTER 
STORE EXPECTED 
READ IMR 

SHOULD STILL BE ALL IS 

IMR REG ERROR 

LOAD MODE BITS FOR ISR 

STORE EXPECTED 

READ ISR 

ISR SHOULD BE CLEARED 



CVDPCC DPVllJ CIAi; TS7 PRTl MACRO H1200 OfC 83 09:55 PAGE 12 8 

SCO 0C55 

T^5 TEST GROUPS 1 AND J IRR UNIQUENESS 



1296 


006474 


001401 






BEQ 


3$ 




1299 


006476 


104006 






ERROR 


6 


:ISR REG ERROR 


1300 


006500 


112710 


000254 


5% : 


HQVB 


4H1ACR, (RO; 


;LOAD MODE BITS FOR ACR 


ISOI 


006504 


111115 






MQVB 


( Rl ; , (R5 ) 


J READ ACR 


1302 


006506 


023715 


001124 




CMP 


SGDDAT , CR5 ) 


: ACK SHOULD DC LLcANtU 


1303 


006512 


001401 






BEQ 


4 $ 




1304 


006514 


104004 






ERROR ♦ 


4 


J ACR REG ERROR 


I ^05 


006516 


105010 




4$ : 


CLRB 


(RO ; 


:CHIP RESET GROUP 1 


1306 


006520 


112710 


000250 




MCVB 


WIRR , ( RO) 


:LOAu MODE BITS FOR IRR 


1307 


006524 


111115 






MQVB 


CRl ) , (R5; 


OCT Ar\ Ton 
;RtAD IHK 


1300 


OODD25 


Uc5/1D 












1309 


006532 


001401 






BEQ 


5t 




1310 


006534 


104003 






ERRORS 


3 


;IRR REG ERROR 


1311 


006536 


005303 




5$: 


DEC 


R3 


sTEST GROUPS 1 AND 2 


1312 


006540 


001405 






BEQ 


TST26 


;;BR V BOTH GROUPS TESTED 
; GROUP 2 CONTROL PORT 


1313 


006542 


013700 


001352 




MOV 


ORCSC.RO 


1314 


006546 


013701 


001356 




MOV 


ORCSO.RI 


;GROUP 2 DATA PORT 


1315 


006552 


000711 






BR 


111) 


:TEST GROUP 2 ACR UNIQUENESS 



1316 
1317 



:iTEST 26 TEST GROUPS 1.2 ACR WITH PATTERNS 

































j<;r 


PC CLRC5R 


•CLEAR ALL CSRS 


X Jew 




UXc r 








MOW 


RP 


iTF5T TWO GROUPS 


1321 


006566 


012757 


006614 


001110 




MOV 


«ll. SLPERR 


;SET UP LOOP RETURN 


1322 


006574 


015700 


001542 






MOV 


DRCSA.RO 


{STORE CSRA ADDRESS 


1323 


006600 


015701 


001546 






MOV 


ORCSB.Rl 


; STORE CSRB ADDRESS 


1324 


006604 


012705 


015272 




111$: 


MOV 


MEGPAT.R3 


J SET UP PATTERN TABLE 


1325 


006610 


010157 


001122 






MOV 


RI.IBOAOR 


J STORE ADDRESS 


1326 


006614 


112710 


000254 




11: 


MOVB 


•hACR.CRO) 


5LOAD MODE BITS FOR ACR 


1327 


006620 


112710 


000500 






MOVB 


♦PACR.(RO) 


: PRESELECT ACR FOR WRITING 


1326 


006624 


111537 


001124 






MOVB 


(R3).$G00AT 


;STORP EXPECTED 


1329 


006630 


111311 








MOVB 


(R5).CR1) 


{WRITE INTO ACR 


1330 


006632 


111115 








MOVB 


CR1).CR5) 


sREAO OUT OF ACR 


1351 


006634 


023715 


001124 






CMP 


»G00AT.(R5) 




1332 


006640 


001401 








BEQ 


2( 




1333 


006642 


104004 








ERRORS 


4 


:ACR REGISTER ERROR 


1334 


006644 


0057r5 






21: 


TST 


(R5)* 


sINC FOR NEXT PATTERN 


1335 


006646 


020527 


015572 






CMP 


R3.4EN00AT 


; CHECK FOR TABLE END 


1336 


006652 


001560 






BNE 


1$ 


sU/R NEXT PATTERN 


1337 


006654 


005502 








DEC 


R2 


sFINISHEO BOTH GROUPS? 


1336 


006656 


001405 








BEQ 


TST27 


ssBR ir EQUAL 


1339 


006660 


015700 


001552 






MOV 


ORCSC.RO 




1340 


006664 


015701 


001556 






MOV 


ORCSO.RI 




1341 


006670 


000745 








BR 


1111 


;D0 NEXT GROUP 


1342 


















1343 




























;*TEST 


27 


TEST GROUPS 


1,2 IMR WITH PATTERNS 




006672 


000004 






TST27: 


SCOPE 






1344 


006674 


004757 


015164 






JSR 


PC.CLRCSR 


: CLEAR ALL CSRS 


1545 


006700 


012702 


000002 






MOV 


«2.R2 


;TEST TWO GROUPS 


1346 


006704 


012757 


006732 


001110 




MOV 


«1I.$LPERR 


5 SET UP LOOP RETURN 


1347 


006712 


013700 


001542 






MOV 


DRCSA.RO 


5 STORE CSRA ADDRESS 


1346 


006716 


015701 


001346 






MOV 


ORCSB.Rl 


s STORE CSRB ADDRESS 



cvwcc 


DRV 1 1. J 


ClAli TS» 


PRTl 


MACRO Ml?00 J 


7 DEC 83 


09:55 PAGE 12 9 




1 £ f 


TEST WOUPS 1.2 


TMD UTTM 


PAT TPOIaQ 








1 ILAO 


006722 


012703 


A1 X:373 
U 1 Oc: r c 


1 1 1 i • 
i i A 9 : 


vi¥ 


wOC.O» ~ 1 i »^ -J 




1 


006726 


010157 


AA1 1 0:3 








• ^TORF AnnRF^ic; 


1 T<1 


006752 


112710 




A * : 






>t DAD MODF RTT^ FDR TMR 


1 X^O 


006736 


112710 










• PRF<^Fl FPT TMR FGR URTTTFJfi 


1 X^X 

1 -P^d 


006742 


111557 


HAI 1 ?A 
VIvA AC** 








•STORE EXPECTED 


1 


006746 


111511 






HOUR 


r R^ f Ri 


• URTTF TfJTn TMR 


1 


006750 


lllllS 






riu VD 


TRI TRS'i 


iRFAH niiT OF TMR 


1 


006752 


025715 






PMP 






1 X<^7 


006756 


001401 






RPQ 








006760 


104005 










•TMR REGISTER ERROR 




006762 


005725 








{ RX » 


•INC FOR FJEXT PATTERN 




006764 


020527 






CHP 


Rx 4>PNnnAT 


•CHECK FOR TABLE END 




006770 


001560 








1 i 


•U/R NEXT PATTERN 




006772 


005502 






HFC 


RP 


•FINISHED BOTH GROUPS'' 




006774 


001405 






RFQ 




: :BR IF EQUAL 




006776 


015700 






MOV 


DRCSC RO 






007002 


015701 


IV)1 x^ 






DRr^n Ri 




1366 


007006 


000745 






BR 


111« 


sOO NEXT GROUP 


1567 
















1368 
























:»TEST 


30 


TEST GROUP 1.2 


CLEAR IMR INSTR. 



S€3 OOK 





007010 


000004 




1369 


007012 


004737 


013164 


1370 


007016 


012704 


000002 


1571 


007022 


015700 


001342 


1572 


007026 


015701 


001346 


1575 


007032 


010157 


001122 


1574 


007056 


005057 


001124 


1575 


007042 


112710 


000244 


1576 


007046 


112710 


000040 


1577 


007052 


lllllS 




1576 


007054 


025715 


001124 


1579 


007060 


001401 




15S0 


007062 


104005 




1581 


007064 


005504 




1582 


007066 


001405 




1565 


007070 


013700 


001552 


1564 


007074 


015701 


001556 


1565 


007100 


000754 




1566 








1367 









1366 
1369 
1390 
1591 
1592 
1595 
1594 
1595 
1396 
1397 
1396 
1399 



007102 
007104 
007110 
007114 
007120 
007124 
007130 
007136 
007142 
007146 
007152 
007154 
007160 



000004 
004737 
012704 
013700 
013701 
010137 
012737 
112710 
112710 
112710 
111115 
023715 
001401 



013164 
000002 
001342 
001346 
001122 
000577 
000244 
000040 
000060 

001124 



TST30: SCOPE 



1<: 



JSP 


PC.CLRCSR 


t CLEAR ALL CSRS 


MOV 


*2.R4 


: COUNTER FOR TWO GROUPS 


MOV 


DRCSA.RO 


iCSRA ADDRESS 


MOV 


DRCSB.Rl 


;CSRB ADDRESS 


MOV 


R1.*BDA0R 


; STORE ADDRESS 


CLR 


tGODAT 


t EXPECTED DATA 


MOVB 


♦MIMR.(RO) 


iLOAO MODE BITS TO READ IMR 


MOVB 


♦CIMR.(RO) 


: CLEAR IMR COMMAND 


MOVB 


(R1).(R5) 


iREAD DATA PORT 


CMP 


<GDDAT.(R5) 




BEQ 


1< 




ERROR' 


5 


{ERROR .IMR SHOULD BE CLEARED 


DEC 


R4 


{FINISHED BOTH GROUPS? 


BEQ 


TST31 


{ {BR IF BOTH GROUPS TESTED 


MOV 


DRCSC. RO 


t SETUP FOR GROUP 2 


MOV 


DRCSD.Rl 




BR 


1111 


J DO IMR TEST WITH GROUP 2 



■ *************************** 

{♦TEST 31 TEST GROUP 1 

TST31: SCOPE 



A************************************ 

.2 SET IMR INSTR. 

************************************* 



001124 



IIK: 



JSR 

MOV 

MOV 

MOV 

MOV 

MOV 

MOVB 

MOVB 

MOVB 

MOVB 

CMP 

BEQ 



PC.CLRCSR 
♦2.R4 
DRCSA.RO 
DRCSB.Rl 
RI . (BDADR 
♦377.IGDDAT 
♦MIMR.(RO) 
*CIMR.(RO) 
♦SIMR.(RO) 
(R1).(R5) 
»GDDAT.(R5) 
1< 



{CLEAR ALL CSRS 

{COUNTER FOR TWO GROUPS 

{CSRA ADDRESS 

{CSRB ADDRESS 

{STORE ADDRESS 

(EXPECTED DATA 

{LOAD MODE BITS TO READ IMR 

CLEAR IMR 

SET IMR COMMAND 

READ DATA PORT 



CVOPCC 0«VllJ DIWJ TST PRTl 



MACRO M1200 27 OFC 83 09:55 PAGE 12 10 



T31 



TEST GROUP 1,2 S£* inR INSTR. 



SCO ootr 



1400 007162 

1401 007164 

1402 007166 
1405 007170 

1404 007174 

1405 007?00 
1406 

1407 



104005 
005504 
001405 
015700 
015701 
000751 



1$: 



001552 
001356 



ERROR « 

DEC 

BEQ 

MOV 

MOV 

BR 



5 

R4 

TST32 
ORCSC.RO 
ORCSD.Rl 
lilt 



ERROR .IMR SHOULD BE SET 
FINISHED BOTH GROUPS? 
;BR IF BOTH GROUPS TESTED 
SETUP FOR GROUP ? 

J DO IMR TEST WITH GROUP k 



!*TEST 32 



TEST GROUP 1.2 CLEAR SINGLE IMR BIT INSTR. 





007202 


000004 




TST32: 


SCOPE 






1408 


007204 


004737 


013164 




JSR 


PC.CLRCSR 


2 CLEAR ALL CSRS 


1409 


007210 


012704 


000002 




nov 




I GROUP COUNTER 


1410 


007214 


012737 


007?52 001110 




HOV 


^11. ILPERR 


X SCOPE RETURN ADDRESS 


1411 


007222 


013700 


001342 




MOV 


DPCSA , RO 


:CSRA ADDRESS 


1412 


007226 


013701 


001346 




MOV 


DRCSB.Rl 


:CSRB ADDRESS 


1415 


007232 


010137 


001122 


1111: 


MOV 


Rl, IBOADR 


{STORE ADDRESS 


1414 


007236 


012703 


013436 




MOV 


MGCHP4 , R3 


•GOOD DATA PATTERN TABLE 


1415 


007242 


112710 


000244 




MOVB 


^IMR.CRO) 


sLOAD MciOE BITS FOR IMR 


1416 


007246 


012702 


000050 




MOV 


^SIMR.R2 


s CLEAR SINGLE IMR BIT VALUE 


1417 




11155/ 


1 Oil 


I* : 


nuvb 


K H5 ) • IbUUMT 




14 IS 




112710 


000060 
www 




MOVB 


^^IMR CRO) 


•5ET ALL IMR RTT5 


1419 


007262 


110210 






MOVB 


R2.(R0) 


: CLEAR SINGLE IMR BIT 


1420 


007264 


111115 






MOVB 


(R1).(R5) 


.•READ DATA PORT 


1 API 


S/SJ f coo 














1422 


007272 


001401 






BEG 


21 




1423 


007274 


104005 






ERROR » 


5 


:IMR REG ERROR 


1424 


007276 


005723 




2$: 


TST 


(R3)» 


;INC EXPECTED DATA TABLE 


1425 


007300 


020327 


013456 




CMP 


R3.«EDCHP4 


:CMECK FOR END 


1426 


007304 


001402 






BEQ 


3$ 




1427 


007306 


005202 






INC 


R2 


:SET UP TO CLEAR NEXT IMR BIT 


1428 


007310 


000760 






BR 


It 


; CLEAR NEXT IMR BIT 


1429 


007312 


005304 




31: 


DEC 


R4 


>D0 CROUPS 1 AND 2 


1430 


007314 


001405 






BEQ 


TST33 


;sBR IF BOTH GROUPS TESTED 
iCSRC ADDRESS 


1431 


007316 


013700 


001352 




MOV 


DRCSC.RO 


1432 


007322 


013701 


001356 




MOV 


DRCSO.Rl 


iCSRD ADDRESS 


1433 


007326 


000741 






BR 


llli 


iOO GROUP 2 


1434 
















1435 
















1436 








;*TEST 


33 


TEST GROUP 1.2 


SET SINGLE IMR BIT INSTR. 



1437 


007330 


000004 




TST33: 


SCOPE 






007332 


004737 


013164 




JSR 


PC.CLRCSR 


: CLEAR ALL CSRS 


1438 


007336 


012704 


000002 




MOV 


*2.R4 


! GROUP COUNTER 


1439 


007342 


012737 


007400 001110 




MOV 


♦1*.»LPERR 


t SCOPE RETURN ADDRESS 


1440 


007350 


013700 


001342 




MOV 


DRCSA.RO 


iCSRA ADDRESS 


1441 


0073S4 


013701 


001346 




MOV 


DRCSB.Rl 


:CSRB ADDRESS 


1442 


007360 


010137 


001122 


111$: 


MOV 


Rl.tBDAOR 


(STORE ADDRESS 


1443 


007364 


012703 


013374 




MOV 


«6GCHP3.R3 


tGOOD DATA PATTERN TABLE 


1444 


007370 


172/10 


000244 




MOVB 


♦MIMR.(RO) 


iLOAD MODE BITS FOR IMR 


1445 


007374 


012702 


000070 




MOV 


•SSIMR,R2 


J SET SINGLE IMR BIT VALUE 


1446 


007400 


111 ^7 


001124 


1): 


MOVB 


(R3).IGDDAT 


; STORE EXPECTED 


1447 


007404 


112710 


000040 




MOVB 


♦CIMR.(RO) 


; CLEAR ALL IMR BITS 


1448 


007410 


110210 






MOVB 


R2.(R0) 


tSET SINGLE IMR BIT 


1449 


007412 


111115 






MOVB 


(R1).(R5) 


.•READ DATA PORT 


1450 


007414 


023715 


001124 




CMP 


$GDDAT.(R5) 





CVORCC ORVllJ DIAG TST PRTl 



HACRO niSOO 27 OFC 83 09:55 PAGE 12 11 



T55 



TEST GROUP 1.2 SFT SINGLE INR BIT INSTR. 



SCO oosa 



1 ASl 


%JSJ f ^CV 


noi40i 














0074P4 


WW J ' C w 






0074P6 


OP05P7 
wi^w^c » 


013414 

wX^*^ X^ 




00743P 


001402 

WW A^wc 




1456 


007434 


005202 




1457 


007416 


000760 

Ww » WW 




1458 


007440 


005304 






00744P 


00140S 






007444 


013700 

W A <^ ■ WW 


001352 


1461 


0074SO 


013701 

WX ^ * wx 


001 356 

WW A 


146P 


0074S4 


000741 

www ' ^ X 




1463 








1464 










007456 


00C004 




1465 


007460 


004737 


013164 


1466 


007464 


012704 


000002 


1467 


007470 


013700 


001342 


1468 


007474 


013701 


001346 


1469 


007S00 


004737 


013234 


1470 


007504 


010137 


001122 


1471 


007510 


012737 


000377 001124 

^#^r^rW ' • ^r^r A 


14 7P 


007516 


11P710 


0002S0 

WwWb JW 


1473 


007522 


112710 

X Xb • XW 


000120 

WW A b w 


1474 


007S>6 

WV ff Jew 


X X X X X J 




14 7S 


007SX0 

W » 


wC^ r X^ 


OOl 124 

wwX XC^ 


1476 


007SX4 


001401 

wwX*VwX 




1477 


007536 


104003 




1478 


007540 


0053C4 




1479 


007542 


001405 




1460 


007544 


013700 


001352 


1481 


007550 


013701 


001356 


1482 


007554 


000753 




1483 








1484 








1485 









2$: 



3ii 



BEQ 

ERROR < 

TST 

CMP 

BEQ 

INC 

BR 

DEC 

BEQ 

MOV 

MOV 

BR 



2i 

5 

(R3)* 

R3.OE0CHP3 

3$ 

R2 

1$ 

R4 

TST34 
DRCSC.RO 
DRCSD.Rl 
111$ 



IMR REG ERROR 

INC EXPECTED DATA TABLF 

CHECK FOR END 

SET UP TO SET NEXT IMR BIT 

SET NEXT IMR BIT 

DO GROUPS 1 AND 2 

:BR IF BOTH GROUPS TESTED 

CSRC ADDRESS 

CSRD ADDRESS 

DO GROUP 2 



♦TEST 34 



TEST GROUP 1.2 SET IRR INSTR. 



T34: 



111$: 



1$: 



SCOPE 






JSR 


PC.CLRCSR 


: CLEAR ALL CSRS 


MOV 


«2.R4 


: COUNTER FOR TWO GROUPS 


MOV 


DRCSA.RO 


tCSRA ADDRESS 


MOV 


DRCSB.Rl 


tCSRB ADDRESS 


JSR 


PC.CLRIRR 


{CLEAR IRR REGS WITH CHIP Rl 


MOV 


Rl.tBDADR 


: STORE ADDRESS 


MOV 


♦377,»G00AT 


i EXPECTED DATA 


MOVB 


«MIRR.(R0) 


;LOAD MODE BITS TO READ IRR 


MOVB 


«SIRR.(R0) 


iSET IRR COMMAND 


MOVB 


(R1).(R5) 


{READ DATA PORT 


CMP 


«G00AT.(R5) 




BEQ 


It 




ERROR* 


3 


t ERROR .IRR SHOULD BE SET 


DEC 


R4 


{FINISHED BOTH GROUPS? 


BEQ 


TST35 


t iBR IF BOTH GROUPS TESTED 


MOV 


DRCSC.RO 


t SETUP FOR GROUP 2 


MOV 


DRCSD.Rl 




BR 


lilt 


>D0 IRR TEST WITH GROUP 2 



{♦TEST 35 



TEST GROUP 1.2 CLEAR IRR INSTR. 





007556 


000004 




TST35: 


SCOPE 




1486 


007560 


004737 


013164 




JSR 


PC.CLRCSR 


1487 


007564 


012704 


000002 




MOV 


«2.R4 


1488 


007570 


013700 


001342 




MOV 


DRCSA.RO 


1489 


007574 


013701 


001346 




MOV 


DRCSB.Rl 


1490 


007600 


004737 


013234 




JSR 


PC.CLRIRR 


1491 


007604 


010137 


001122 


lilt: 


MOV 


Rl.tBDADR 


1492 


007610 


005037 


001124 




CLR 


tGODAT 


1493 


007614 


112710 


000250 




MOVB 


♦MIRR.CRO) 


1494 


007620 


112710 


000120 




MOVB 


♦SIRR.CRO) 


1495 


007624 


112710 


000100 




MOVB 


♦CIRR.CRO) 


1496 


007650 


111115 






MOVB 


(R1).(R5) 


1497 


007632 


023715 


001124 




CMP 


tGDDAT.(R5) 


1498 


007636 


001401 






BEQ 


It 


1499 


007640 


104003 






ERROR t 


3 


1500 


007642 


005304 




It: 


DEC 


R4 


1501 


007644 


001405 






BEQ 


TST36 



(CLEAR ALL CSRS 
{COUNTER FOR TWO GROUPS 
iCSRA ADDRESS 
{CSRB ADDRESS 

{CLEAR IRR REGS WITH CHIP RESET 

{STORE ADDRESS 

{EXPECTED DATA 

{LOAD MODE BITS TO READ IRR 

{SET IRR BITS 

{CLEAR IRR COMMAND 

{READ DATA PORT 



{ERROR .IRR SHOULD BE CLEARED 
{FINISHED BOTH GROUPS? 
{{BR IF fOTH GROUPS TESTED 



CVORCC OnvilJ OIAG TST PRTl 



MACRO N1200 27 DEC -85 09:55 PAGE 



12 12 



T55 



TEST GROUP 1.2 CLEAR IRR INSTR. 



SEQ 00)9 



1502 007646 

1503 007652 

1504 007656 
1505 

1506 



013700 
013701 
000752 



001352 
001356 



MOV 
MOV 
BR 



DRCSC.RO 
DRCSD.Rl 
111* 



sSE'UP rOR GROUP 2 

(DO IRR TEST WITH GROUP 2 



♦TEST 36 



TEST GROUP 1.2 CLEAR SINGLE IRR BIT INSTR. 





007660 


000004 




TST36: 


SCOPE 






1507 


007662 


004737 


013164 




JSR 


PC.CLRCSR 


: CLEAR ALL CSRS 


1506 


007666 


012704 


000002 




MOV 


«2.R4 


.•GROUP COUNTER 


1509 


007672 


012737 


007734 001110 




NOV 


4»1*.»LPERR 


: SCOPE RETURN ADDRESS 


1510 


007700 


013700 


001342 




MOV 


DRCSA.RO 


tCSRA ADDRESS 


1511 


007704 


013701 


001346 




NOV 


DRCSB.Rl 


tCSRB ADDRESS 


1512 


007710 


004737 


013234 




JSR 


PC.CLRIRR 


i CLEAR IRR REGS UITH CMIP RESET 


1513 


007714 


010137 


001122 


IIK: 


MOV 


Rl.SBDADR 


: STORE ADDRESS 


1514 


007720 


012703 


013436 




MOV 


«BGCHP4.R3 


:G000 DATA PATTERN TABLE 


1515 


007724 


112710 


000250 




MOVB 


«niRR.(RO) 


tLOAD MODE BITS FOR IRR 


1516 


007730 


012702 


000110 




MOV 


«CSIRR.R2 


i CLEAR SINGLE IRR BIT VALUE 


1517 


007734 


111337 


001124 


IS: 


MOVB 


(R3).iGDDAT 


s STORE EXPECTED 


1516 


007740 


112710 


000120 




MOVB 


*SIRR.(RO) 


tSET ALL IRR BITS 


1519 


007744 


110210 






MOVB 


R2.(R0) 


{CLEAR SINGLE IRR BIT 


1520 


007746 


111115 






MOVB 


(Rl).(RS) 


{READ DATA PORT 


1521 


007750 


023715 


001124 




CMP 


SGDDAT.CRS) 




1522 


007754 


001401 






BEQ 


2i 




1525 


007756 


104003 






ERROR* 


3 


:IRR REG ERROR 


1524 


007760 


005723 




2t: 


TST 


CR3)» 


tINC EXPECTED DATA TABlE 


1525 


007762 


020327 


013456 




CMP 


R3.«EDCHP4 


t CHECK FOR END 


1526 


007766 


001402 






BEQ 


3$ 




1527 


007770 


005202 






INC 


R2 


sSET UP TO CLEAR NEXT IRR BIT 


1528 


007772 


000760 






BR 


1* 


(CLEAR NEXT IRR BIT 


1529 


007774 


005304 




3i: 


DEC 


R4 


iDO GROUPS 1 AND 2 


1530 


007776 


001405 






BEQ 


TST37 


t iBR IF BOTH GROUPS TESTED 


1531 


010000 


013700 


001352 




MOV 


DRCSC.RO 


sCSRC ADDRESS 


1532 


010004 


013701 


001356 




MOV 


DRCSD.Rl 


iCSRD ADDRESS 


1533 


010010 


000741 






BR 


111» 


iDO GROUP 2 


1534 














1535 






















;*TEST 


37 


TEST GROUP 1.2 


SET SINGLE IRR BIT INSTR. 



1536 
1537 
1536 
1539 
1540 
1541 
1542 
1543 
1544 
1545 
1546 
1547 
154S 
1549 
1550 
1551 
1552 



010012 
010014 
010020 
010024 
010032 
010036 
010042 
010046 
010052 
010056 
010062 
010066 
010072 
010076 
010100 
010102 
010106 
010110 



000004 
004737 
012704 
012737 
013700 
013701 
004737 
010137 
012703 
112710 
012702 
111337 
112710 
110210 
111115 
023715 
001401 
104003 



013164 
000002 

010066 001110 

001342 

001346 

013234 

001122 

013374 

000250 

000130 

001124 

000100 



001124 



fsT37: 



1111: 



IS: 



SCOPE 






JSR 


PC.CLRCSR 


i CLEAR ALL CSRS 


MOV 


«2.R4 


t GROUP COUNTER 


MOV 


«1> . ILPERR 


1 SCOPE RETURN ADDRESS 


MOV 


DRCSA.RO 


iCSRA ADDRESS 


MOV 


DRCSB.Rl 


iCSRB ADDRESS 


JSR 


PC.CLRIRR 


i CLEAR IRR REGS UITH CHIP RESET 


MOV 


Rl.SBDADR 


: STORE ADDRESS 


MOV 


«6GCHP3.R3 


iGOOD DATA PATTERN TABLE 


MOVB 


«MIRR.(RO) 


{LOAD MODE BITS FOR IRR 


MOV 


♦SSIRR.R2 


tSET SINGLE IRR BIT VALUE 


MOVB 


CR3).SG00AT 


t STORE EXPECTED 


MOVB 


«CIRR.CRO> 


i CLEAR ALL IRR BITS 


MOVB 


R2.(R0) 


iSET SINGLE IRR BIT 


MOVB 


(R1).(R5) 


;READ DATA PORT 


CMP 


SG00AT.(R5) 




BEQ 


2S 




ERROR* 


3 


;IRR REG ERROR 



lACflU H1?00 



DfC as O ♦:•>'. PAGf i5 



TS7 TEST GHOUP I. J bINljLt BIT W.rR. 

010112 
010114 
010120 
010122 
010124 
010126 
OlOlSO 
0101S2 
OIOIM 
010142 



1555 
1554 
1555 
1556 
1557 
1556 
1559 
1560 
1561 
1562 
156S 
1564 



005725 






TST 


(R5). 


iINC EXPECTED DATA TABLE 


020 S27 


01 5414 




CMP 


R^.4€DCMP5 


1 CHECK rOR END 


001402 






BEQ 


51 




005202 






INC 


R2 


iSET UP TO SET NE/T IRR BIT 


000760 






BR 


1* 


iSET MEXT IRR BIT 


005504 




5»: 


OFC 


R4 


iOO GROUPS 1 AND 2 


001405 






BEQ 


TST40 


1 iBR IF BOTH GROUPS TESTED 


015700 


001552 




MOV 


ORCSC.RO 


iCSRC ADDRESS 


015701 


001556 




NOV 


ORCSO.Rl 


:CSRD ADDRESS 


000741 






BH 


111! 


iDO GROUP 2 



J •TEST 40 



TEST GROUP 1.2 CLEAR IRR.ZMR ZNSTR. 





010144 


000004 




TST40: 


SCOPE 






1565 


010146 


0047S7 


013164 




JSR 


PC.CLRCSR 


i CLEAR ALL CSRS 


1566 
1567 


010152 


012704 


000002 




NOV 


•2.R4 


1 COUNTER FOR TWO GROUPS 


010156 


015700 


001342 




NOV 


DRCSA.RO 


iCSRA ADDRESS 


1568 


010162 


015701 


001346 




NOV 


DRCSB.Rl 


tCSRB ADDRESS 


1569 


010166 


004737 


013234 




JSR 


PC.CLRIRR 


t CLEAR ZRR REGS UITH CHIP RESET 


1570 


010172 


010137 


001122 


1111: 


NOV 


Rl.tBDADR 


1 STORE ADDRESS 


1571 


010176 


005037 


001124 




CLR 


•COOAT 


lEXPECTED DATA 


1572 


010202 


112710 


000250 




Nove 


«NIRR.(RO> 


tLOAO NODE BITS TO READ IRR 


157S 


010206 


112710 


000120 




NOVB 


•SZRR.(RO) 


iSET IRR BITS 


1574 


010212 


112710 


000060 




Nove 


•SIHR.(RO) 


iSET ZHR BITS 


1575 


010216 


112710 


000020 




NOVB 


KIRM).(RO) 


1 CLEAR IRR*IHR CONNAND 


1576 


010222 


111115 






Nove 


(R1).(R5) 


iREAD DATA PORT TOR IRR 


1577 


010224 


023715 


001124 




CMP 


•COOAT. (R5) 




1576 


0102S0 


001401 






BEQ 


11 




1579 


0102S2 


104003 






ERROR* 


3 


lERROR .IRR SHOULD BE CLEARED 


1580 


010254 


112710 


000244 


1«: 


NOVB 


«NIHR.(RO) 


iLOAD NODE BITS TO READ INR 


1581 


010240 


111115 






NOVB 


(R1).(R5) 


tREAD INR REG 


1582 


010242 


023715 


001124 




CNP 


•COOAT. (R5) 




158S 


010246 


001401 






BEQ 


2t 




1584 


010250 


104005 






ERROR* 


5 


tIRR*INR CONNAND DID NOT CLEAR INI 


1585 


0102S2 


005304 




21: 


Dec 


R4 


iriNISHED BOTH GROUPS? 


1586 


010254 


001405 






BEQ 


TST41 


t iBR IF BOTH GROUPS TESTED 


1587 


010256 


013700 


001352 




NOV 


ORCSC.RO 


t SETUP FOR GROUP 2 


1588 


010262 


013701 


001356 




NOV 


DRCSD.Rl 




1589 


010266 


000741 






BR 


lll^ 


iDO IRR*INR TEST UITH GROUP 2 


1590 
















1591 

















t«TEST 41 



TEST GROUP 1.2 CLEAR SINGLE IRR* INR BIT INSTR. 





010270 


000004 




TST41: 


SCOPE 






1592 


010272 


004737 


013164 




JSR 


PC.CLRCSR 


laEAR ALL CSRS 


1593 


010276 


012704 


000002 




NOV 


42. R4 


1 GROUP COUNTER 


1594 


010302 


012737 


010340 001110 




NOV 


^•.•LPCRR 


1 SCOPE RETURN ADDRESS 


1595 


010310 


013700 


001342 




NOV 


DRCSA.RO 


iCSRA ADDRESS 


1596 


010314 


013701 


001346 




NOV 


DRCSB.Rl 


tCSRS ADDRESS 


1597 


010320 


004737 


013234 




JSR 


PC.CLRIRR 


1 CLEAR IRR REGS WITH CHIP RESE^ 


1598 


010324 


010137 


001122 


111*: 


NOV 


RI.IBDADR 


1 STORE ADDRESS 


1599 


010S50 


012703 


013436 




NOV 


•6GC»«>4.R3 


iGOOO DATA PATTERN TABLE 


1600 


0103S4 


012702 


000030 




NOV 


•CSZRNR.R2 


t CLEAR SINGLE IRR 'INR BI' VALUE 


1601 


010S40 


111337 


001124 


1«: 


NOVB 


(R3).IG00AT 


t STORE EXPECTED 


1602 


010S44 


112710 


000250 




NOVB 


•NIRR.(RO) 


{LOAD NODE BITS TO READ IRR 


1603 


010350 


112710 


000120 




NOVB 


«SIRR.(RO) 


jSFT ALL IRR BITS 









PR11 


MACRO M1200 J 








TEST GROUP 1.^ 


CIL4R SIVfiLF Vm-im BIT INSTR. 






010S54 


112710 


00006C 










010S60 


110210 






novB 


op roo) 




010S62 


111115 






tlOVB 


r p 1 ) r as ^ 




010364 


025715 


001124 




CMP 




IMA 


010S70 


001401 






BEQ 


21 




010S72 


104005 






ERROR* 


3 


AD iU 


010S74 


112710 


000244 




HOVB 


OMIMR CRO) 


1^ 1 1 


010400 


111115 






HOVB 


fRl ) (RS) 
v"A y#v~^' 




010402 


025715 


001124 




CMP 


tGDDAT CRS) 


Aw A ^ 


010406 


001401 






BEQ 


3t 


AV A^ 


010410 


104005 






ERROR « 




Aw A^ 


010412 


005725 




5t: 


TST 


(R3)» 


&w Aw 


010414 


020527 


015456 




CMP 


R3 •E0CHP4 


Aw A ' 


010420 


001402 






BEQ 


41 


AO AO 


010422 


005202 






INC 


RP 


AO A ' 


010424 


000745 






BR 




AOCV 








41 • 


DEC 


R4 


A A 


0104 SO 


001405 






BEQ 


TST42 


1 

AOCtf 


0104 S2 


015700 


001552 




MOV 


DRCSC RO 


162S 


010456 


015701 


001556 




MOV 


DRCSO.Rl 


1624 


010442 


000750 






BR 


lilt 
















A wCw 






















;*TeST 


42 


TE^T GROUPS 




010444 


000004 




TST42: 


SCOPE 




AwK ' 


010446 


004757 


015164 




JSR 


PC ClRCSR 


A w£ W 














AWK V 














AW<9V 














Aw<9 A 














Aw^C 


010452 


012704 


000002 




MOV 


#P R4 


AW«7w 


010456 


004757 


015234 




JSR 


PC clrirr 




010462 


010557 


001122 


lilt: 


MOV 


RS IBOADR 


A W^^ 


010466 


112710 


000500 




MOVB 




16S6 

A w«^w 


010472 


112711 


000577 




MOVB 


#377 (Rl) 


I6S7 


010476 


112710 


000120 




MOVB 


#^rRR (RO) 




010502 


112710 


000040 




MOVB 


#CTMR CRO) 


16S9 


010506 


112712 


000254 




MOVB 




1640 


010512 


005057 


001124 




CLR 


IGDDAT 


1641 


010516 


111515 






MOVB 


rR3) fR5) 


1642 


010520 


025715 


001124 




CMP 




1643 


010524 


001401 






BEQ 


1 ft 

A • 


1644 


010526 


104004 






ERRORS 


4 


164S 


0105S0 


112712 


000244 


It: 


MOVB 




1646 


010554 


012757 


000577 


001124 


MOV 


#377 IGDDAT 


1647 


010542 


111515 






MOVB 


rR3) fRS) 


1648 


010544 


025715 


001124 




CMP 


IGDDAT CRS) 


1649 


010550 


001401 






BEQ 


PI 


1650 


010552 


104005 






ERROR ♦ 


5 


16S1 


010554 


112712 


000240 


2t: 


MOVB 




16S2 


010560 


005057 


001124 




CLR 


IGDDAT 


165S 


010564 


111515 






MOVB 


(R5).(RS) 


1654 


010566 


025715 


001124 




CMP 


«G00AT.(R5) 


1655 


010572 


001401 






BEQ 


51 


1656 


010574 


104006 






ERRORS 


6 


1657 


010576 


112712 


000250 


5$: 


MOVB 


•mRR.(R2) 



lS€T ALL IMR BITS 

iCLFAR SINGLE IRR*tHR BIT 

iREAO DATA PORT TQR IRP 



iIRR REG ERROR 
iSET UP TO READ IMR 
:REAO im REGISTER 



tlHR REG ERROR 

I INC EXPECTED DATA TABLE 

I CHECK FOR END 

tSET UP TO CLEAR NEXT IRR.ir«> BIT 

iCLEAR NEXT IRR>IMR BIT 

iOO GROUPS 1 AND 2 

iiBR IF BOTH GROUPS TESTED 

:CSRC ADDRESS 

iCSRO ADDRESS 

iDO GROUP 2 



2 FOR GROUP UNIQUENESS 



i CLEAR ALL CSRS 
(CSRA - RO 
tCSRB - Rl 
iCSRC • R2 
tCSRO - R5 

{COUNTER FOR TESTING TUO GROUPS 

t CLEAR IRR REGS UITH CHIP RESET 

i STORE ADDRESS 

{PRESELECT ACR FOR WRITING 

{WRITE INTO DATA PORT FOR ACR 

(SET IRR TO ALL I'S 

(CLEAR IMR 

(LOAD NODE TO READ ACR 
(EXPECTED 

(STORE DATA FOR COMPARE 
(CHECK ACR RESULTS 

(ERROR. OTHER GROUP ACR SHOULD BE CLEARED 
(CHANGE TO IMR REGISTER 
(STORE EXPECTED 
(READ IMR 

(SHOULD BE ALL IS 

(ERROR. OTHER GROUP IMR SHOULD BE SET 
(LOAD MODE BITS FOR ISR 
(STORE EXPECTED 
(READ ISR 

:ISR SHOULD BE CLEARED 

(ISR REG ERROR 

(LOAD MODE BITS FQR IRR 



T4J TfST GROUPS ^On group L»<10L<Nt3S 



1656 


010602 


11151% 








novB 


CR3).(R5) 
«G00A7.CRS) 


iREAD IRP 


16S4 


010604 


023715 


001124 






CHP 


iIRR SHOULD BE CLEARfD 


1660 


010610 


001401 








BEQ 


4« 




1661 


010612 


104005 










5 


1 ERROR. OTHER GROUP IRR SH0«A0 BE C EAPEO 


1662 


010614 


005504 






41: 


DEC 


R4 


{TEST GROUPS 1 AND 2 


1663 












DC V 


TST45 


1 iBR ir BOTH CROUPS TE^Ttt] 


1664 


010620 


004757 


015164 






JSR 


PC.CLRCSR 


t CLEAR ALL CSRS 


1665 


010624 


013700 


001552 






HOV 


DRCSC.RO 


: GROUP 2 CONTROL PORT 


1666 


010630 


015701 


001556 






MOV 


ORCSD.Rl 


i GROUP 2 DATA PORT 


1667 


010654 


015702 


001342 






MOV 


0RCSA.R2 


{GROUP 1 CONTROL PORT 


1666 


010640 


015705 


001346 






MOV 


0RCS6.R5 


{GROUP 1 DATA PORT 


1669 


010644 


004757 


013254 






JSR 


PC.CLRIRR 


1 CLEAR IRR REGS UITH CHIP RESET 


1670 
1671 
1672 


010650 


000704 








BR 


111* 


{TEST GROUP 2 ACR UNIQUENESS 










s*TEST 


43 


TEST STATUS BITS GINT.S2.S1.S0.GP1 .2 




010652 


000004 






TST45: 


SCOPE 






1673 


010654 


004757 


015164 






JSR 




.^1 CAD Al 1 ^CDC 


1674 


010660 


015700 


001542 






MOV 






1675 


010664 


015701 


001546 






MOV 






1676 


010670 


012705 


000002 






MOV 


#2»H5 


. A A TUA r^Al AC 
8 LIU IWU iiHOl^b 


1677 


010674 


012704 


000120 




1111: 


MOV 


A 9 OA OA 


.CtfDC^TCA CTATllC OTTC 


1678 


010700 


005077 


170456 






CLR 




.T^TT ^CDA 


1679 


010704 


005077 


170442 






CLR 


WHCbC 


tXNXT CbRC 


1660 


010710 


012702 


015274 






MOV 




.CtfDC^TCn TOO DATTCDIU 


1681 


010714 


112760 


000001 


000001 




Move 


AD T T A 9 / DA ^ 


.^CD TA iTDl IT MAAC 


1682 


010722 


112777 


000204 


170412 




Move 


AOAA Bff^D^CA 


. D^ 1 CA MAAC CfVk ^CDA I^Al D 1 


1683 


0107S0 


112777 


000204 


170414 




MOVB 


AOAA BAD^C^ 


tH(A.LcU nuuc. rUR LbRLibNUUI' ^ 


1684 


010736 


112710 


000020 






Move 


A^TDMD ^DA"^ 


• ^1 CAD TMD A TDD 
ILLcRH X™f ♦ XRH 


1685 


010742 


012757 


000070 


001572 




MOV 


ACCTMD TMDl A^ 


• CTADC ^AnC FAD CTIhtftI C TMD 


1686 


010750 


012757 


000150 


001576 




MOV 




• CTADC rone cad cTurti c tdd 

tdlUnC LUUC r\jK sXrHjCC XHN 


1687 


010756 


010057 


001122 




1121: 


MOV 


RO iBOAOR 


CHIP romAMD ADORF^^ 


1688 


010762 


010457 


001124 






MOV 


R4.IG00AT 


{EXPECTED DATA 


1689 


010766 


115710 


001576 






MOVB 


IRRLOC.CRO) 


{SET SINGLE IRR BIT 


1690 


010772 


111015 








MOVB 


(R0).(R5) 


{CHECK STATUS 


1691 


010774 


042715 


000007 






BIC 


#7.<R5) 


{{ «•* VORCAl ADOS THIS *«* {{GPA 


1692 


011000 


025715 


001124 






CMP 


•G0DAT.(R5) 




1693 


011004 


001401 








BEQ 


11 




1694 


011006 


104007 








ERROR* 


7 


{CHIP STATUS ERROR 


1695 


011010 


005057 


001124 




11: 


CLR 


IGOOAT 




1696 


011014 


010157 


001122 






MOV 


Rl.tBDADR 


{CSR CHIP DATA ADDRESS 


1697 


011020 


111257 


001124 






MOVB 


(R2).tG00AT 




1698 


011024 


112710 


000250 






MOVB 


•MIRR.(RO) 


(READ IRR 


1699 


011030 


111115 








MOVB 


(R1).(R5) 




1700 


011032 


025715 


001124 






CMP 


•G00AT.(R5) 


{CHECK IRR 


1701 


011036 


001401 








BEQ 


2t 




1702 


011040 


104005 








ERROR* 


3 


(IRR ERROR 


1703 


011042 


010057 


001122 




21: 


MOV 


RO.IBDADR 




1704 


011046 


115710 


001572 






MOVB 


IMRLOC.(RO) 


(SET IMR BIT 


1705 


011052 


012757 


000520 


001124 




MOV 


•320.tG00AT 


(CSR EXPECTED DATA 


1706 


011060 


111015 








MOVB 


(R0).(R5) 




1707 


011062 


042715 


000007 






BIC 


♦7.(R5) 


(CLEAR UNDCriNED BITS 


1708 


011066 


025715 


001124 






CMP 


IGOOAT. (R5) 




1709 


011072 


001401 








BEQ 


5$ 




1710 


011074 


104007 








ERROR* 


7 


(CHIP STATUS ERROR 


1711 


011076 


010157 


001122 




Si: 


MOV 


Rl.tBDADR 





CVORCC (WVUJ CIAi, Tsl PRTl hacrO MIPOO 
T45 TEST STATUS BITS HINT .:»2.S1.S0.GP1 .2 



1712 
171J 
1714 
1715 
1716 
1717 
1716 
1'19 
1720 
1721 
1722 
172S 
1724 
1723 
1726 
1727 
1726 
1729 
1750 
1751 
1752 
1755 



1754 
1735 
1756 
1737 
1756 
1759 
1740 
1741 
1742 
1745 
1744 
1745 
1746 
1747 
1746 
1749 
1750 
1751 
1752 
1755 
1754 
1755 
1756 
1757 
1756 
1759 
1760 
1761 
1762 
1765 
1764 
1765 



011102 
011106 
011112 
011114 
011120 
011122 
011124 
011126 
011152 
011154 
011140 

011144 
011146 
011152 
011154 
011156 
011162 
011166 



011172 
011174 



011200 
011206 
011212 
011220 
011226 
011250 
011252 
011256 
011242 
011246 
011252 
011256 
011264 
011270 
011274 
011276 
011502 
011510 
011512 
011516 
01i:.22 
011524 
011550 
011552 
011534 
011340 
011546 



011257 
112710 
111115 
025715 
001401 
104005 
005722 
020227 
001407 
005257 
005257 

000240 
000157 
005505 
001406 
015700 
015701 
000157 



012757 
012704 
112760 
112761 
105010 
105012 
112710 
112712 
112710 
112712 
011460 
012760 
112710 
112712 
005114 
011460 
012760 
005114 
010157 
111457 
111115 
025715 
001401 
104005 
010537 
116437 
042737 



001124 
000244 

001124 



015514 

001576 
001572 



010756 



001552 
001556 
010674 



41: 

j:GPA 
5$: 



000004 

004757 015164 



*TEST 
TST44 



011252 001110 
015272 

000001 000001 

000001 000001 



000204 
000204 

000250 
000250 
000002 

177777 000002 

000020 

000020 

000002 

177777 000002 



1<: 



001122 
001124 

001124 



21: 



001122 51: 
000001 001124 
000560 001124 



r -'I 

09:55 PKit 12 l*> 



(R2).tG00AT 

•»1IMR.(R0) 

(RD.CRS) 

tG00AT.(R5) 

At 

5 

(R2)» 

R2.9E0CHP1 
5t 

IRRLOC 
inRLQC 
R4 

1121 
R5 

TST44 
ORCSC.RO 
ORCSO.Rl 
111* 



;EXPECTEO DATA 
tREAO im BITS 
I SAVE im READ 



:inR ERROR 

(NEXT EXPECTED FOR IHR 
: CHECK FOR END 



IRR 



iNEXT IRR BIT 
(NEXT INR BIT 
I INDEX EXPECTED STATUS 

VDftCAl DELETES INC R4 ttGPA 
J DO NEXT STATUS CHECK 
I FINISHED BOTH GROUPS? 
liBR IF EQUAL 



iDO NEXT GROUP 



TEST POLLED HODExCSRS A.B-OUT C.D-IN. ACTIVE LOU 



PC.CLRCSR 



♦1 » . ILPERR 
•BEGPAT.R/. 
•BITO.lOO) 
«BIT0.KR1) 

(RO) 
(R2) 

#204. (RO) 

♦204. (R2) 

•fIRR.CRO) 

♦/1IRR.(R2) 

(R4),2(R0) 

»-l,2(R0) 

#CIfmR.(ftO) 

«CIRMR.(R2) 

(R4) 

(R4).2(R0) 

»-1.2(R0) 

(R4^ 

Rl.tBDAOR 

(R4).$G00AT 

(R1).(R5) 

•GOOAT.(RS) 

5$ 

3 

R5.>BDADR 

l(R4).$GDDAr 

«560.«GDDAT 



CLEAR ALL CSRS 
RO 
Rl 
R2 
R3 



CONTROc 
DATA 
CONTROL 
DATA 



CSRA 
CSRC 



CSRA -GROUP 1 
CSR8 -GROUP 1 
CSRC -GROUP 2 
CSRD -GROUP 2 
SET FOR SCOPE RETURN 
START OF PATTERN TABLE 
SET CSRA TO OUTPUT MODE 
SET CSRB TO OUTPUT MODE 
CHIP RESET GROUP 1 
CHIP RESET GROUP 2 
LOAD MODE BITS FOR POLLED HOOE.GR 1 
LOAD MODE BITS FOR POLLED nODE.GR2 
LOAD BITS TO READ IRR GROUP 1 
LOAD BITS TO READ IRR GROUP 2 
SET PATTERN D6RA FROM H TO L 
FORCE ALL BITS IN DBDRA HIGH 
CLEAR IHR*IRR GROUP 1 
CLEAR IMR»IRR GROLP 2 
COMPLEMENT TABLE DATA 
XMIT CSR 

FORCE ALL BITS HIGH AGAIN 
RESTORE TABLE DATA 
GROUP 1 DATA PORT 

I READ IRR. GROUP 1 



:IRR ERROR. GROUP 1 
i GROUP 2 DATA PORT 
s BUILD EXPECTED DATA 
:SAVE BITS 0-3 



CVORCC [WvllJ DIACi TSI PRTl MACRO M1?00 OfC 85 09:55 PAGf 1? 17 

'if ''ii CX;44 

T44 TFST POLLED liOO£«C0RS A.B-OUT C.D-IN. ACTIVE LOW 



1766 


011554 


052757 


OOOlOO 


001124 




BIS 


•lOO.tGOOAT 


! EXPECTED 0 5.URPLT 6(C) 


176^ 


011562 


111515 








nova 


(R5),(R5) 


sREAO IRR BITS. GROUP 2 


1766 


011564 


025715 


001124 






CMP 


$G0DAT.(R5) 




1769 


011570 


001401 








BEQ 


4f 




1770 


011572 


104005 








ERROR » 


3 


:IRR ERROR. GROUP 2 


1771 


011574 


005762 


000002 




4$: 


TST 


2(R2) 


:REAO DBRC rOR RPLr 4(A) 


1772 


011400 


052757 


000020 


001124 




BIS 


«20.SGODAT 


s STORE EXPECTED 


i;7s 


011406 


111315 








MOVB 


(R5).CR5) 


:READ IRR BITS. GROUP <> 


1774 


011410 


025715 


001124 






CMP 


IGDDAT.CRS) 




1775 


011414 


001401 








BEQ 


5$ 




1776 


011416 


104005 








ERROR » 


3 


iIRR ERROR. GROUP 2 


1777 


011420 


005061 


000002 




5S: 


CLR 


2(R1) 


(CLEAR DBRB TOR RPt 7(D) 


1778 


011424 


052737 


000200 


001124 




BIS 


•200.IGDDAT 


(EXPECTED 


1779 


011432 


111315 








MOVB 


(R3).(R5) 


(READ IRR BITS GROUP 2 


1700 


011434 


023715 


001124 






CMP 


SGDDAT.(R5) 




1781 


011440 


001401 








BEQ 


61 




1782 


011442 


104003 








ERRORS 


3 


:IRR ERROR. GROUP 2 


1783 


011444 


005765 


000002 




61: 


TST 


2(R5) 


sREAO DBRO TOR RPLV 5(B) 


1784 


011450 


052757 


000040 


001124 




BIS 


«40.IGD0AT 




1785 


011456 


111315 








MOVB 


(R5).(R5) 


(READ IRR BITS GR0UP2 


1786 


011460 


025715 


001124 






CMP 


IGOOAT.(RS) 




1787 


011464 


001401 








BEQ 


7t 


(GET NEXT PATTERN 


1788 


011466 


104005 








ERROR » 


5 


sIRR ERROR. GROUP 2 


1 


7%} 


OU3r24 






f • : 


TCT 


f OA ^ A 




1790 


011472 


020427 


015572 






CMP 


R4.«END0AT 


(CHECK FOR END 


1791 


011476 


001265 








BNE 


1< 


(DO NEXT PATTERN 


1792 


















1795 


















1794 


























;*TEST 


45 


TEST GROUPS 


1.2 IN PXLEO MODE. NO REPLY 




011500 


000004 






TST45: 


SCOPE 






1795 


011502 


004737 


015164 






JSR 


PC.CLRCSR 


(CLEAR ALL CSRS 


1796 














(RO - CSRA -GROUP 1 CONTROL 


1797 
















tRl ■ CSRB -GROUP 1 DATA 


1798 
















tR2 - CSRC -GROUP 2 CONTROL 


1799 
















iR3 - CSRO -GROUP 2 DATA 


1800 


011506 


012704 


000002 






MOV 


♦2.R4 


(TUO PASSES 


1801 
















(FIRST PASS CSRA. CSRB - OUTPUT 


1802 
















( CSRC. CSRO - INPUT 


180S 
















(SEC PASS CSRC. CSRO - OUTPUT 


1804 
















1 CSRA. CSRB - INPUT 


1805 


011512 


112760 


000001 


000001 


nil: 


MOVB 


«6IT0.1(R0) 


(SET CSR TO OUTPUT MODE 


1806 


011520 


112761 


000001 


000001 




MOVB 


•BITO.KRl) 


(SET CSR TO OUTPUT MODE 


1607 


011526 


012760 


177777 


000002 




MOV 


«-1.2(R0) 


(SET ALL ONES 06R FOR H TO L 


1808 


011534 


105010 








CLR6 


(RO) 


(CHIP RESET GROUP CSR 


1809 


011536 


105012 








CLR6 


(R2) 


(CHIP RESET GROUP CSR 


1810 


011540 


112710 


000204 






MOVB 


•204. (RO) 


(LOAD MODE BITS FOR POLLED MODE 


1811 


011544 


112712 


000204 






MOVB 


•204. (R2) 


(LOAD MODE BITS FOR POLLED MODE 


1812 


011550 


112710 


000020 






MOVB 


KIRMR.(RO) 


(CLEAR IMR»IRR 


1813 


011554 


112712 


000020 






MOVB 


KIRMR.(R2) 


(CLEAR IMR«IRR 


1814 


011560 


005760 


000002 






TST 


2(R0) 


(READ DBR IN OUTPUT MODE. NO REPLY 


1815 


011564 


012737 


000520 


001124 




MOV 


•320.IGDDAT 


(STORE EXPECTED 


1816 


011572 


010037 


001122 






MOV 


RO.IBOAOR 


(STORE ADDRESS 


1817 


011576 


111015 








MOVB 


(R0),(R5) 


(READ STATUS 


1818 


011600 


042715 


000007 






BIC 


•7.(R5) 


(CLEAR UNDEFINED BITS 


1819 


011604 


025715 


001124 






CMP 


♦G00AT.CR5) 


(CHECK STATUS 



CVWCC OnvilJ DlAi, Tbi PPT I MACRO M1200 j: DfC 83 
r45 TEST GROUPS 1.2 IN PCXLtO «00£.NO REPLY 



1620 


011610 


001401 








BEQ 


1821 


011612 


104007 








ERROR » 


1822 


011614 


010257 


001122 




11: 


MOV 


182S 


011620 


111215 








MOVB 


1824 


011622 


042715 


000007 






SIC 


1825 


011626 


025715 


001124 






CMP 


1826 


011652 


001401 








BEQ 


1627 


011654 


104007 








ERROR* 


1828 


011656 


012762 


000000 


000002 


2$: 


MOV 


1829 


011644 


005761 


000002 






TST 


18S0 


011650 


012765 


000000 


000002 




MOV 


1831 


011656 


010157 


001122 






MOV 


1852 


011662 


112710 


000250 






MOVB 


1835 


011666 


005057 


001124 






CLR 


1854 


011672 


111115 








MOVB 


1855 


011674 


025715 


001124 






CMP 


1856 


011700 


001412 








BEQ 


18^7 


011702 


005757 


017544 






TST 


1858 


011706 


001406 








BEQ 


1859 


011710 


012757 


000500 


001124 




MOV 


1640 


011716 


025715 


001124 






CMP 


1841 


011722 


001401 








BEQ 


1842 


011724 


104005 






lOOS: 


ERROR* 


1845 


011726 


005057 


001124 




3$: 


CLR 


1844 


011752 


010557 


001122 






MOV 


1845 


011756 


112712 


000250 






MOVB 


1846 


011742 


111515 








MOVB 


1647 


011744 


025715 


001124 






CMP 


1648 


011750 


001412 








BEQ 


1649 


011752 


005757 


017544 






TST 


1850 


011756 


001406 








BEQ 


1651 


011760 


012757 


000060 


001124 




MOV 


1852 


011766 


025715 


001124 






CMP 


1655 


011772 


001401 








BEQ 


1854 


011774 


104005 






101$: 


ERROR ^ 


1655 


011776 


005504 






4$: 


DEC 


1656 


012000 


001415 








BEQ 


1657 


012002 


004757 


015164 






JSR 


1856 


012006 


015700 


001552 






MOV 


1659 


012012 


015701 


001556 






MOV 


1660 


012016 


015702 


001542 






MOV 


1661 


012022 


015705 


001546 






MOV 


1662 


012026 


000651 








BR 


1665 














1664 
























;*TEST 


46 




012050 


000004 






TST46: 


SCOPE 


1665 


012052 


004757 


015164 






JSR 


1666 














1667 














1668 














1669 














1670 


012056 


012737 


012110 


001110 




MOV 


1671 


012044 


012704 


015272 






MOV 


1672 


012050 


112762 


000001 


000001 




MOVB 


1675 


012056 


112765 


000001 


000001 




MOVB 



O^iSS PAGE IP iS 



SfQ 0005 



li 

7 

R2.$8DA0R 
(R2).(R5) 
*7,(R5) 
»GDDAT,(R5) 

2i 

7 

♦0,2(R2) 

2(R1) 

•0.2(R3) 

Rl.SBDAOR 

«MIRR.(RO) 

tGODAT 

(Rl).(R5) 

♦GDOAT.CRS) 

it 

KXTFLAG 
100* 

«300.«G00AT 
«GOOAT.(RS) 
3» 

3 

IGOOAT 

RS.tBOAOR 

«niRR.(R2) 

CR3),CR5) 

(G00AT.CR5) 

4» 

KXTFLAG 
lOK 

•60.(GD0AT 

fG00AT.(R5) 

4t 

3 

R4 

TST46 

PC.CLRCSR 

ORCSC.RO 

ORCSO.Rl 

0RCSA.R2 

DRCSB.R3 

lilt 



■.CHIP STATUS ERROR 
! STORE ADDRESS 
sREAD STATUS 
5 CLEAR UNDEFINED BITS 



; CHIP STATUS ERROR 

sURITE ONLY.DBR INPUT NODE FOR NO REPL ' 

{READ OBR OUTPUT MODE. NO REPLr 

iURITE ONLY. OBR INPUT MODE. NO REPLY 

; CHIP DATA PORT 

{LOAD BITS TO READ IRR 

;IRR SHOULD BE ZERO 

:READ IRR 



ON KXTll. READ -BEFORE -URITE. 
...AT 2% UPSETS EXPECTED IRR, 
TRY THE ALTERNATE VALUE. 



:IRR ERROR* 

J CHIP DATA PORT 

tLOAO MODE BITS TO READ IRR 

:READ IRR BITS 



I ON KXTll. DITTO. 

I TRY THE ALTERNATE VALUE. 



I IRR ERROR* 
(FINISHED TWO PASSES 
i;BR IF EQUAL 
{CLEAR ALL CSRS 
J SET UP FOR NEXT PASS 



iDO NEXT PASS 



»»GPA 
»;GPA 
,,GPA 
;;GPA 
J »GPA 
JiGPA 
llGPA 



;sGPA 
:jGPA 
s;GPA 
jsGPA 
!:GPA 
;:GPA 



TEST POLLED MODEtCSRS C.D-OUT A. B-IN. ACTIVE LOU 



PC.CLRCSR 



«1».(LPERR 
«6EGPAT.R4 
•BIT0.1(R2) 
*BIT0.1(R3) 



: CLEAR ALL CSRS 

iRO - CSRA -GROUP 1 CONTROL 

|R1 - CSRB -GROUP 1 DATA 

|R2 - CSRC -GROUP 2 CONTROL 

:R3 - CSRD -GROUP 2 DATA 

5 SCOPE LOOP RETURN 

iPATTERN TABLE 

:SET CSRC TO OUTPUT MODE 

;SET CSRD TO OUTPUT MODE 



CVOPCC DWVllJ DIAi, TST PRTi 



MACRO H1200 



OfC 83 09:5S PAGE 12 19 



r46 



TEST POLLED MOOEjCSRS C.O-OUT A.B IN. ACTIVE 



SEQ 0046 



1874 




lOSOlO 








CLRB 


(RO) 


18''5 




10S012 

A W^WAC 








CLRB 


(R2) 






112710 

A AC f A V 


000204 






MOVB 


^204. 'RO) 


1877 


012074 


112712 

A AC • AC 


000204 






MOVB 


«204,(R2) 


1878 

AW » w 


012100 

VAC AW 


112710 

A AC • AW 


000250 

wwwc ^w 






MOVB 


^IRR.CRO) 


1879 


012104 

W AC J 


112712 

A AC ' AC 


0002S0 

WWWC 






MOVB 


^IRR.CR2) 


1880 


012110 


011462 


000002 




1$ : 


MOV 


(R4),2(R2) 


1881 


012114 

W AC A A^ 


012762 

WAC ' WC 


177777 


000002 




MOV 


^-1,2(R2) 


1882 


012122 

V AC ACC 


112710 


000020 






MOVB 


dCIRMR.CRO) 


188 S 


012126 

V AC AC V 


112712 


000020 






MOVB 


^IRMR,(R2) 


1864 


012132 


005114 








COM 


(R4) 


1885 


012134 


011462 


000002 






MOV 


(R4).2(R2) 


1666 


012140 


012762 


177777 


000002 




MOV 


♦-1.2(R2) 


1887 


012146 


005114 








COM 


(R4) 


1886 


012150 


010137 


001122 




2$: 


MOV 


Rl, iBOAOR 


1689 


012154 


111437 


001124 






MOVB 


(R4). IGDDAT 


1890 


012160 


111115 








MOVB 


(R1).(R5) 


1891 


012162 


023715 


001124 






CMP 


$GD0AT.(R5) 


1692 


012166 


001401 








BEQ 


3$ 


1693 


012170 


104003 








ERRORS 


3 


1894 


012172 


010337 


001122 




3$: 


MOV 


R3. IBDADR 


1895 


012176 


116437 


000001 


001124 




MOVB 


1(R4), IGDDAT 


1896 


012204 


042737 


000360 


001124 




BIC 


^360 . IGDDAT 


1697 


012212 


052737 


000020 


001124 




BIS 


4»20, IGDDAT 


1898 


012220 


111315 








MOVB 


(R3).(R5) 


1899 


012222 


023715 


001124 






CMP 


IGDDAT. (R5) 


1900 


012226 


001401 








BEQ 


41 


1901 


012230 


104003 








ERRORS 


3 


1902 


012232 


005760 


000002 




4$: 


TST 


2(R0) 


1903 


012236 


052737 


000100 


001124 




BIS 


MOO. IGDDAT 


1904 


012244 


111315 








MOVB 


(R3),(R5) 


1905 


012246 


023715 


001124 






CMP 


IGDDAT. (R5) 


1906 


012252 


001401 








BEQ 


51 


1907 


012254 


104003 








ERROR ♦ 


3 


1906 


012256 


005063 


000002 




5$: 


CLR 


2(R3) 


1909 


012262 


052737 


000040 


001124 




BIS 


640. IGDDAT 


1910 


012270 


111315 








MOVB 


(R3).(R5) 


1911 


012272 


023715 


001124 






CMP 


IGDDAT. (RS) 


1912 


012276 


001401 








BEQ 


61 


1913 


012300 


104003 








ERROR ♦ 


3 


1914 


012302 


005761 


000002 




6$ : 


TST 


2(R1) 


1915 


012306 


052737 


000200 


001124 




BIS 


0200, IGDDAT 


1916 


012314 


111315 








MOVB 


(R3).(R5) 


1917 


012316 


023715 


001124 






CMP 


IGDDAT. (R5) 


1918 


012322 


001401 








BEQ 


71 


1919 


012324 


104003 








ERRORS 


3 


1920 


012326 


005724 






7$: 


TST 


(R4)* 


1921 


012330 


020427 


013572 






CMP 


R4,«EN00AT 


1922 


012334 


001265 








BNE 


1$ 


1923 
















1924 
















1925 
















1926 


























j^TEST 


47 


TEST IRR BIT 




012336 


000004 






TST47: 


SCOPE 




1927 


012340 


004737 


013164 






JSR 


PC.CLRCSR 



sCHlP RESET GROUP I CSRA 
tCHiP RESET GROUP 2 CSRC 
iLOAO BITS FOR POLLED nOOE.GR 1 
tLOAO BITS FOR POILED M00E,GR2 
;LOAO BITS TO READ IRR GRP 1 
I LOAD BITS TO READ IRR GRP 2 
J SET PATTERN DBRC FOR H TO L 
: FORCE ALL BITS IN DRDBC HIGH 
: CLEAR ir«)*IRR GROUP 1 
; CLEAR IMR»IRR GROUP 2 
! COMPLEMENT TABLE DATA 
jXMIT CSR 

J FORCE ALL BITS MIGM 
(RESTORE TABLE DATA 
: GROUP 1 DATA PORT 

iREAO IRR. GROUP I 



:IRR ERROR. GROUP 1 
> GROUP 2 DATA PORT 

:SAVE BITS 0-3 
{EXPECTED 0-5,URPLY 4(A) 
:READ IRR BITS. GROUP 2 



tIRR ERROR. GROUP 2 
:REAO DBRA FOR RPLV 6(C) 
t STORE EXPECTED 
I READ IRR BITS. GROUP 2 



iIRR ERROR. GROUP 2 

> CLEAR DBRD FOR RPY 5(B) 

(EXPECTED 

(READ IRR BITS GROUP 2 



:IRR ERROR. GROUP 2 
{READ OBRB FOR RPLY 7(0) 

;REAO IRR BITS GR0UP2 



tIRR ERROR. GROUP 2 
(INDEX DATA TABLE 
(CHECK FOR END 
(00 NEXT PATTERN 



(iJRS 
(( JRS 

{{JRS 



J J JRS 
((JRS 
(iJRS 
mJRS 



TEST IRR BITS WITH DATA PAT.. POLLED HOOE.ACT. HIGH 



(CLEAR ALL CSRS 



CVOftCC 0«VIIJ OIA(; Tbt PRTl MACRO Ml^OO L'/ OFC 85 09:55 PAGE I? 20 
T47 TEST IM) BITS WITH DATA PAT.. POLLED NODE. ACT. HIGH 



'irO 004 7 



192S 
1929 
1930 
1951 
1932 
1933 
1934 
1935 
1936 
1937 
1936 
1939 
1940 
1941 
1942 
1943 
1944 
1945 
1946 
1947 
1946 
1949 
1950 
1951 
1952 
1953 
1954 
1955 
1956 
1957 
1956 
1959 
1960 
1961 
1962 



012344 
012350 
012356 
012362 
012366 
012372 
012400 
012406 
012412 
012420 
012424 
012430 
012436 
012442 
012446 
012452 
012456 
012460 
012464 
012466 
012470 
012474 
012502 
012510 
012516 
012524 
012526 
012532 
012534 
012536 
012540 
012544 



012703 
012737 
013700 
013701 
013702 
112760 
112761 
112710 
112760 
005060 
112710 
112760 
011360 
010137 
112710 
111337 
111115 
023715 
001401 
104003 
010237 
112760 
116337 
042737 
052737 
111215 
023715 
001401 
104003 
005723 
020327 
001325 



013272 
000001 
001342 
001346 
001356 
000001 
000001 
000224 
000224 
000002 
000020 
000020 
000002 
001122 
000250 
001124 

001124 



001122 
000250 
000001 
000360 
000100 

001124 



013572 



001110 

000001 
000001 

000010 
000010 



1«! 



000010 
001124 
001124 
001124 



2li 



3t: 







• nPT OATA PATTTDIa TARI T 










nOCQA DO 






nOCQR R1 




MOU 


nRr<;n 




MnuR 


MTTO ITRO") 


<r<;PA OUTPUT MOOP 


MOUR 




ifc^RR OUTPUT MOOF 


MOUR 




si OAO MOOP RTT<; POP POl l PO 


MOUR 


lOfRO") 


• 1 OAO MOOP RTTc; POP P04 1 PO 


CI R 


PfRO^ 


i CLEAR D6RA 


MOVB 


^CIRMR (ROl 


t CLEAR IMR »IRR GROUP 1 


MOUR 


^TRMR lOfRO*) 


zCLPAR TMR ^ IRR GROUP P 


MOV 


TPS') P^RO^ 


i^TORP PATTFRM IMTO ORRA 


MOV 


R1 iROAOR 


1 r ^RR AOORP ^ 


MOUR 


dMTRR fRO') 


• LOAO RTT^ TO RPAO TRRl 


MOVB 






MOVR 




•READ IRR GPl 

9 f^w^w xnn ■ VJ» X 


CMP 




REQ 


PI 




ERROP* 


3 


tIRR ERROR GPl 


MOV 


RP t BO ADR 


iC^RD ADDRE^^ 


MOVB 


dMIRR lOCRO) 


2 SET MODE TO READ IRR BITS 


MOVR 




iRUiLD EXPECTED DATA 

iDwX^w 1 Lw I ~ 


Rir 


tcnoAT 


fRITS 0-5 EXPECTED 


BIS 


«100. IGOOAT 


r'A** REPLY EXPECTED 


novB 


(R2).(R5) 


{READ IRR2 


C^»> 


«G0DAT,(R5) 




BEQ 


3« 




ERROR* 


3 


sIRR GROUP 2 


TST 


(R3)» 


; INDEX DATA TABLE 


CMP 


RS.«ENDDAT 


J CHECK FOR PATTERN END 


BNE 


It 


sDO NEXT PATTERN 



J •TEST 50 



TEST CSRA AND CSRB WITH RESET 



012546 


000004 






TST50: 


SCOPE 






012550 


012737 


000001 


001160 




MOV 


•l.tTIMES 


tiDO 1 ITERATION 


1963 012556 


004737 


013164 






JSR 


PC.CLRCSR 


t CLEAR ALL CSRS 


1964 012562 


013700 


001342 






MOV 


DRCSA.RO 




1965 012566 


013701 


001346 






MOV 


DRCS6.R1 




1966 012572 


112760 


001001 


000001 




MOVB 


•lE'BITO.lCRO) 


J CSRA TO OUTPUT MODE 


1967 012600 


112761 


000001 


000001 




MOVB 


«6IT0.1(R1) 


iSET CSRB TO OUTPUT MODE 


1966 012606 


010037 


001122 






MOV 


RO.tBOADR 


: STORE CSRA ADDRESS 


1969 012612 


012737 


100300 


001124 




MOV 


•100300. tCODAT 


jROY ♦ CHIP STATUS EXP'D 


1970 012620 


000005 








RESET 


J INITIALIZE 


1971 012622 


011015 








MOV 


(R0).(R5) 


J STORE REC'D 


1972 012624 


042715 


000007 






6IC 


#7.(R5) 


tCLEAR UNDEFINED BITS 


1973 012630 


023715 


001124 






CMP 


»GDDAT.CR5) 


iMAKE COMPARE 


1974 012634 


001401 








BEQ 


1> 




1975 012636 


104002 








ERROR » 


2 


iCSRA ERROR ON RESET 


1976 012640 


012737 


100000 


001124 




MOV 


«100000.tGDOAT 


J STORE EXPECTED 


1977 012646 


010137 


001122 






MOV 


Rl . tBOAOR 


s CHECK CSRB 


1976 012652 


onus 








MOV 


CR1).(R5) 


1 STORE IN $BDDAT 


1979 012654 


023715 


001124 






CMP 


»G00AT,(R5) 


:MAKE COMPARE 


1960 012660 


001401 








BEQ 


TST51 


s;BR IF EQUAL 



CVOPCC 
T50 



MACRO MIPOO .'7 D^C 85 09:55 



PAGE ?l 



TEST CSRA AND CSRP UITh RESFl 



SEQ 004IS 



1961 


012662 


104002 








ERROR* 


? 


:CSRe ERROR WITH RESET 




















1965 


















1964 




























;»TEST 


51 


TEST CSRC ANO C5RD WITH RESET 




012664 


000004 






TST51: 


SCOPE 








012666 


012757 


000001 


001160 




MOV 


Al tTTHFQ 
VI 9 9 1 inc3 


S ■ \J\J L X i Cnn I Xw>^ 


1965 


012674 


004757 


015164 






JSR 


or n orcD 




1966 


012700 


015702 


001552 






MOV 


nprcr qo 




1967 


012704 


015705 


001556 






MOV 


UnivDU (HO 




1966 


012710 


112762 


000001 


000001 




MOVB 


VOX 1 \/ • X V r%C J 




1969 


012716 


112765 


000001 


000001 




MOVB 


vox 1 SJ » L\ J 


• T r^Rn TO OUTPUT Monp 


1990 


012724 


010257 


001122 






MOV 






1991 


012750 


012757 


100200 


001124 




MOV 




1 * * ^**X* 3 1 n 1 W9 


1992 


012756 


000005 








RESET 






1993 


012740 


011215 








MOV 


(RP^ TRS) 


•STORE CSRC 


1994 


012742 


042715 


000007 






BIC 


♦7.(R5) 


:CLEAR UNDEFINED BUS 


1995 


012746 


025715 


001124 






CMP 


*GD0AT.(R5) 


sMAKE COr«>ARE 


1996 


012752 


001401 








BEQ 


11 




1997 


012754 


104002 








ERRORS 


2 


iCSRC ERROR UITH RESET 


1996 


012756 


010557 


001122 




1$: 


MOV 


R3.«B0A0R 


: CHECK CSRD 


1999 


012762 


012757 


100000 


001124 




MOV 


«100000.«GOOAT 


8 STORE EXPECTED 


2000 


012770 


011515 








MOV 


(R3).(R5) 


:READ CSRD 


2001 


012772 


025715 


001124 






CMP 


)G00AT.(R5) 


SHAKE COMPARE 


2002 


012776 


001401 








BEQ 


2t 




2003 


015000 


104002 








ERROR « 


2 


sCSRD ERROR ON RESET 


2004 


015002 








2$: 








2005 



















CVDRCC DWvllJ TSl PRTl 



MACRO Hl?00 



DFC 85 09:5S PAGE 



T51 



TEST CSRC AND CSRD WITH RESET 



SCO 004<» 



zoo 7 












2006 












2009 












^010 






jOGN' T 


REPORT 


"EOP" 


2011 


013002 


013701 


001342 NXDEV: 


HOV 


DRCSA.Rl 


2012 


013006 


000241 


NXDEVl: 


CLC 




2013 


013010 


006037 


001364 


PGR 


OMAP 


2014 


013014 


001412 




BEQ 


»EOP 


2015 


013016 


162701 


000020 


SUB 


♦20.RI 


2016 


013022 


005237 


001202 


INC 


lUNIT 


2017 


013026 


032737 


000001 001364 


BIT 


•l.OMAP 


2016 


013034 


001764 




BEQ 


NXDEVl 


2019 


013036 


000137 


002100 


JMP 


NEXPAS 


2020 






.SBTTL 


END OF 


PASS ROUT 



INIT TO SETUP NEXT ORVllJ ADDRESSES 

CLEAR CARRY TOR DEVICE HAP 

LOOK FOR NEXT DRVllJ 

BR IF ALL TESTED 

NEXT DRVll-J STARTS -20 

UPDATE UNIT NUMBER 

IS UNIT SELECTED? 
;NEXT,IF NOT SELECTED 
:TEST NEXT ORVIl-J 



013042 








$E0P: 






013042 


000240 








NOP 




013044 


005037 


001102 






CLR 


ITSTNM 


013050 


005037 


001160 






CLR 


$ TIMES 


013054 


005237 


001176 






INC 


IPASS 


013060 


042737 


100000 


001176 




BIC 


♦100000. IPASS 


013066 


005327 








DEC 


(PC)* 


013070 


000001 






lEOPCT: 


.UORD 


1 


013072 


003022 








BGT 


$D0AGN 


013074 


012737 








MOV 


(PC)»,8(PC)» 


013076 


000001 






lENOCT: 


.WORD 


1 


013100 


013070 








♦EOPCT 




013102 


104401 


013147 






TYPE 


.lENOMG 


013106 


013746 


001176 






nov 


♦PASS.-CSP) 


013112 


104405 








TYPOS 




013114 


104401 


013144 






TYPE 


.lENULL 


013120 


013700 


000042 




IGET42: 


MOV 


a«42.R0 


013124 


001405 








BEQ 


IDOAGN 


013126 


000005 








RESET 




013130 


004710 






lENOAO: 


JSR 


PC.CRO) 


013132 


000240 








NOP 




013134 


000240 








NOP 




013136 


000240 








NOP 




013140 








lOOAGN: 






013140 


000137 








JMP 


8CPC)» 


013142 


002034 






IRTNAD: 


.WORD 


STARTl 


013144 


377 


377 


000 


lENULL: 


.BYTE 


-1.-1.0 


013147 


015 


012 


105 


lENDMG: 


.ASCIZ 


<15><12>/EN0 


013152 


116 


104 


040 








013155 


120 


101 


123 








013160 


123 


040 


043 








013163 


000 













i* INCREMENT THE PASS NUMBER OPASS) 

;*TYPE "END PASS AXXXXX" (WHERE XXXXX IS A DECIMAL NUMBER) 
:*IF THERES A MONITOR GO TO IT 
;*IF THERE ISN'T JUMP TO STARTl 



i:ZERO THE TEST NUTQER 
:sZERO THE NUMBER OF ITERATIONS 
it INCREMENT THE PASS NUMBER 
i:DON'T ALLOW A NEG. NUMBER 
s sLOOP? 



a J YES 

iiRESTORE COUNTER 



J J TYPE "END PASS 4" 

s 5 SAVE $PASS FOR TyPEOUT 

isGO TYPE--OECIMAL ASCII WITH SIGN 

It TYPE A NULL CHARACTER 

mGET MONITOR ADDRESS 

I } BRANCH IF NO MONITOR 

> (CLEAR THE WORLD 

i tGO TO MONITOR 

it SAVE ROOM 

uFOR 

iiACTll 



i (RETURN 



((NULL CHARACTER STRING 



CVCWCC 


ORvllJ 




PRTl 


^lACRO ril200 OFC 83 09:55 PAGE 


14 


PROGRAM 


SUBROUTINES 










202? 








.SB TIL PROGRAM 


SUBR0UTINF3 














































2026 








.•CLEAR ALL CONTROL/STATUS REGISTERS 


2021 








;INIT REGISTERS 


R0-R4 WITH 


CSRA CSRD 










;ANO STORE IBDDAT INTO R5. 




2029 

SVC 7 














2030 


015164 


012705 


001126 


CLRCSR: MOV 


«$B00AT«R5 


:BAO OATA STORAGE IN R5 


2051 


015170 


015700 


001342 


MOV 


ORCSA.RO 


;CSRA ADDRESS TO RO 


20S2 


015174 


015701 


001546 


MOV 


DRCSB.Rl 


;CSRB ADDRESS TO RI 


2035 


015200 


015702 


001352 


MOV 


DRCSC.R2 


;CSRC ADDRESS TO R2 


2054 


015204 


015703 


001356 


MOV 


0RCSD.R3 


;CSRD ADDRESS TO R3 


2035 


015210 


005057 


001124 


CLR 


IGOOAT 


J CLEAR EXPECTED 


2036 


015214 


005015 




CLR 


(R5) 


; CLEAR REC'D 


2057 


015216 


005010 




CLR 


CRO) 


J CLEAR CSRA; CHIP RESET GROUP I 


2058 


015220 


105061 


000001 


CLRB 


KRl) 


; CLEAR HIGH BtTE CSRB 


2059 


015224 


005012 




CLR 


(R2) 


; CLEAR CSRCjCHiP RESET GROUP 2 


2040 


015226 


105065 


000001 


CLRB 


1(R3) 


; CLEAR HIGH BYTE CSRD 


2041 


015252 


000207 




RTS 


PC 


2042 














2045 














2044 








; CLEAR IRR REGISTERS, GROUP 


1, GROUP 2 WITH CHIP RESET 


2045 


015254 


010046 




CLRIRR: MOV 


RO.-(SP) 




2046 


015256 


015700 


001342 


MOV 


DRCSA.RO 


; START OF CSR ADDRESS 


2047 


015242 


105060 


000011 


CLRB 


IKRO) 


;CSRC TO INPUT MODE 


2048 


015246 


112760 


000001 


000001 MOVB 


«6IT0.1(R0) 


;CSRA TO OUTPUT MODE 


2049 


015254 


005060 


000002 


CLR 


2(R0) 


s CLEAR DBRA 


2050 


015260 


105010 




CLRB 


(RO) 


;CHIP RESET OF GROUP 1 


2051 


015262 


105060 


000010 


CLRB 


lO(RO) 


;CHIP RESET OF GROUP 2 


2052 


015266 


012600 




MOV 


CSP)».RO 


;RESTORE REGISTER 


2055 


015270 


000207 




RTS 


PC 


;EXIT 


2C54 















SCO WAj 



CVWCC ORVIIJ CKM; TSt PRTl MACRO H1200 L'7 0€C 85 09:55 PAGE 15 



PROGRAH 


SUBPOOTINES 
















205^ 






.SBTTL PATTERNS 


FOR REGISTER R/U 


2058 






• 










; PAT TERNS USED FOR LOADING /READING REGISTERS 


2060 










2061 


013272 


000000 


BEGPAT: 0 


s GROWING 1 


2062 


013274 


000001 


BGPATl: 1 




2063 


013276 


000003 


3 




2064 


013300 


000007 


7 




2065 


013302 


000017 


17 




2066 


013304 


000037 


37 




2067 


013306 


000077 


77 




2066 


013310 


000177 


177 




2069 


013312 


000377 


377 




2070 


013314 


000777 


EDCMPl: 777 




2071 


013316 


001777 


1777 




2072 


013320 


003777 


3777 




2073 


013322 


007777 


7777 




2074 


013324 


017777 


17777 




2075 


013326 


037777 


37777 




2076 


013330 


077777 


77777 




2077 


013332 


177777 


177777 




2076 


013334 


177776 


BGCHP2: 177776 


s GROWING 0 


2079 


013336 


177774 


177774 




2060 


013340 


177770 


177770 




2081 


013342 


177760 


177760 




2082 


013344 


177740 


177740 




2083 


013346 


177700 


177700 




2084 


013350 


177600 


177600 




2085 


013352 


177400 


EDCHP2: 177400 




2086 


013354 


177000 


177000 




2087 


013356 


176000 


176000 




2088 


013360 


174000 


174000 




2089 


013362 


170000 


170000 




2090 


013364 


160000 


160000 




2091 


013366 


140000 


140000 




2092 


013370 


100000 


100000 




2093 










2094 


013372 


000000 


000000 




2095 


013374 


000001 


BGCHP3: 1 


; WALKING 1 


2096 


013376 


000002 


2 




2097 


013400 


000004 


4 




2098 


013402 


000010 


10 




2099 


013404 


000020 


20 




2100 


013406 


000040 


40 




2101 


013410 


000100 


100 




2102 


013412 


000200 


200 




2103 


013414 


000400 


EDCHP3: 400 




2104 


013416 


001000 


1000 




2105 


013420 


002000 


2000 




2106 


013422 


004000 


4000 




2107 


013424 


010000 


10000 




2108 


013426 


020000 


20000 




2109 


013430 


040000 


40000 




2110 


013432 


100000 


100000 




2111 


013434 


177777 


177777 


: WALKING 0 


2112 


013436 


177776 


BGCHP4: 177776 





m 

CVORCC OPVllJ DIAr, TST PRTl HACRO HIPOO 27 DEC 83 09:55 PAGE 15 I 
PATTERNS FOR REGISTER R/U 



2tlS 


015440 


177775 




177775 


2114 


015442 


177775 




177773 


2115 


013444 


177767 




177767 


2116 


015446 


177757 




17775/ 


2117 


013450 


177757 




177737 


2118 


013452 


177677 




177677 


2119 


013454 


177577 




177577 


2120 


013456 


177377 


E0CHP4: 


177377 


2121 


013460 


176777 




176777 


2122 


013462 


175777 




175777 


212S 


013464 


173777 




173777 


2124 


013466 


167777 




167777 


2125 


013470 


157777 




157777 


2126 


013472 


137777 




137777 


212/ 


013474 


077777 




077777 


2128 


013476 


177777 




177777 


2129 


013500 


oocooo 


ENOPAT: 


000000 


2130 










2131 






{DATA 1 


PATTERNS 


2132 


013502 


155555 


PATDAT: 


155555 


2133 


013504 


133333 




133333 


2134 


013506 


066666 




066666 


2135 


013510 


125252 




125252 


2136 


013512 


052525 




052525 


2137 


013514 


177777 




177777 


2138 


013516 


000000 




000000 


2139 


013520 


107070 




107070 


2140 


013522 


070707 




070707 


2141 


013524 


144444 




144444 


2142 


015526 


033333 




033333 


2143 


015550 


011111 




011111 


2144 


015552 


022222 




022222 


2145 


015534 


044444 




044444 


2146 


015536 


mill 




mill 


2147 


015540 






166666 


2148 


015542 


010421 




010421 


2149 


015544 


021042 




021042 


2150 


015546 


051463 




051465 


2151 


015550 


042104 




042104 


2152 


015552 


065146 




065146 


215S 


015554 


075567 




075567 


2154 


015556 


104210 




104210 


2155 


015560 


114651 




114631 


2156 


015562 


155673 




135673 


2157 


015564 


146314 




146514 


2158 


015566 


156755 




156735 


2159 


013570 


167356 




167356 


2160 


013572 


000000 


ENOOAT: 


000000 


2161 











CVOACC MVtlJ dim; Tsi PftTl 
$«SrMC ROUTINES 

2164 
2165 



015574 
01S600 
015602 
015604 
013606 
015610 
015614 
015622 
015624 
015652 
015S54 
015640 
015644 
015646 
015654 
015656 
013660 
013662 
013664 
013666 
015672 
015674 
0137«V> 
015702 
015706 
013710 
013712 
013714 
013716 
013722 
013724 
013750 
015754 
01S736 

013742 
015746 
015750 
015754 
015760 



105757 
100002 
000000 
000450 
010046 
017600 
122757 
001011 
152737 
001405 
010057 
004757 
000000 
152757 
001005 
112046 
001005 
005726 
012600 
062716 
000002 
122716 
001430 
122716 
001006 
005726 
104401 
001165 
105037 
000755 
004737 
123726 
001350 
013746 

105366 
002770 
004737 
105537 
000770 
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.SBTTl STSnAC ROUTIHES 
.S8TTL TrPE ROUTINE 



001157 



000002 
000001 



•ROUTINE TO TYPE ASCIZ MESSAGE. MESSAGE MUST TERMINATE WITm A 0 BrTE. 
•THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 
•NOTEl: INULL CONTAINS THE CHARACTER TO BE USED AS T»€ FILLER ChaRACTFR 

•N0TE2. IFILLS CONTAINS T^C NL*«ER OF FILLER CHARACTERS REOLIHEO. 

•N0TE3: IFILLC CONTAINS THE CHARACTER TQ FILL AFTER. 

• 

•CALL: 
•1) USING A 
• TYPE 
•OR 



TRAP INSTRUCTION 
.MESAOR 



iiMESAOR IS FIRST ADDRESS OF AN ASCIZ j'^IhT, 



001210 



000100 001211 

013644 
014156 

000040 001211 



000002 
000011 
000200 

014124 

014006 
001156 

001154 

000001 

014006 
014124 



1 • 


TYPE 






1 • 


MESAOR 






; • 

♦TYPE: 


TST9 


ITPFLG 


J lis THERE A TERHIMAl: 




BPL 


11 


•iBR IF YES 




HALT 




llHALT HERE IF NO TERMINAL 




BR 


5t 


t {LEAVE 


It: 


MOV 


RO. (SP) 


(tSAVE RO 




MOV 


82(SP).R0 


{(GET ADDRESS OF ASCIZ STRING 




CMPB 


•APTENV.tENV 


i {RUNNING IN APT MODE 




BNE 


62* 


iiNO.GO CHECK FOR APT CONSOLE 




BITB 


•AP T SPOOL. lENVM 


il SPOOL MESSAGE TO APT 




BEQ 


62* 


iiNQ.GO CHECK FOR CONSOLE 




nov 


R0.61> 


II SETUP MESSAGE ADDRESS FOR APT 




JSR 


PC.IATV3 


II SPOOL MESSAGE TO APT 


61t; 


.WORD 


0 


tiMESSAGE ADDRESS 


62t: 


BITB 


•APTCSUP.tENVM 


11 APT CONSOLE SUPPRESSED 




BNE 


601 


II YES, SKIP TYPE OUT 


21: 


novB 


(RO)*.-(SP) 


iiPUSH CHARACTER TO BE TtPEO ONTO STACK 




BNE 


41 


i iBR IF IT ISN' T THE TERMINATOR 




TST 


(SP)* 


11 IF TERMINATOR POP IT OFF THE STACK 


60t: 


MOV 


(SP)».RO 


iiRESTORE RO 


51; 


AOO 


•2.(SP) 


11 AO JUST RETURN PC 




RTI 




1 iRETURN 


41: 


CMPB 


♦MT.CSP) 


iiBRANCH IF <HT> 




BEQ 


s> 






CMPB 


♦CRLF.CSP) 


t {BRANCH IF NOT «CRLF> 




BNE 


5< 






TST 


CSP)» 


iiPOP «CR>*LF> EOUIV 




TYPE 




iiTYPE A CR AND LF 




•CRLF 








CLRB 


ICHARCNT 


iiCLEAR CHARACTER COUNT 




BR 


2t 


iiGET NEXT CHARACTER 


51: 


JSR 


PC.ITYPEC 


tiGO TYPE THIS CHARACTER 


6*: 


CMPB 


•FILLC.(SP)» 


Ills IT TIME FOR FILLER CHARS.? 




BNE 


21 


iiIF NO GO GET NEXT CHAR. 




MOV 


•NULL.-(SP) 


iiGET • OF FILLER CHARS. NEEDED 






iiAND THE NULL CHAR. 


7$: 


DECB 


KSP) 


iiOOES A NULL NEED TO BE TYPED? 




BLT 


61 


;tBR IF NO-GO POP THE NULL OFF OF STACK 




JSR 


PC.ITYPEC 


iiGO TYPE A NULL 




DECB 


$CHARCNT 


ijOO NOT COUNT AS A COL»<T 




BR 


7$ 


ill OOP 



2166 





C: 4 , T S T 


PRTl 


MACRu n\2C0 


n^c 85 


0*^:5^ PAGt lf» i 






UTIN£ 


























jMORI/ONTAL TAB 


PROCESSOR 






015/62 




000040 




6S: 


HOVB 


0 , C SP ) 


AC ni Aetr TAD tiT T c n A ef 

S |Rr PLACE TAB WITH SPACr 




01S766 


004757 


014006 




91: 


JSR 


PC . % T YPEC 


t 1 TYPE A SPACE 




015772 


152757 


000007 


014124 




BITS 


0 7,1 CM AHCN T 


1 lOHANCM IF NOT AT 




014000 


001372 








BNE 


91 


T AD P T AB 

; 1 TAB 5 TOP 




014002 


005726 








TST 


(SP)» 


BAB eBA^C^ d T A e ^ 

1 jPOP SPACE OFF STAC^ 




014004 


000724 








BR 


2% 


T w T AB Ae TC B 

II GET NEXT CMARACTER 




014006 








ITyPEC: 










014006 


105777 


165132 






TSTB 


81 IKS 


^kjAB T&t ft^wBB Bi f B^ 

5 iCMAR IN KYBu BUFFER? 


;MJ000l 


014012 


100022 








BPL 


101 


1 jBR IF NOT 


jMjoOOl 


014014 


017746 


165126 






WOV 


•ITKB. ( SP ) 


T AB 

1 iGET CMAK 


•MJOOOI 


014020 


042716 


177600 






BIC 


4177600. CSP ) 


llSTRIF cXTKANtOUS blT^ 


M ^B/\ 1 


014024 


122716 


000023 






CMPB 


fIXuFF , CSP) 


g |WAS LnAH XIF^ F 


M ^^/\B . 


014030 


001012 








BNE 


1021 


BB Tr fcJ^T 

1 |BR IF NOT 


; MJOOOI 


014032 








101 1: 








{HjDOOl 


014032 


105777 


165106 






TSTB 


8ITKS 


uATT e AB et.j AB 

tlWAIT FUN CHAR 


iHJOOOl 


014036 


10C375 








BPL 


1011 




|H«X)OOI 


014040 


117716 


165102 






MOVB 


01 TKB . C SP ) 


; lUET CMAR 


injDDDI 


014044 


042716 


177600 






BIC 


#177600. V SP ; 


; 1 STHIH 1 T 


M ir\BA> t 


014050 


122716 


000021 






CMPB 


#IXON.(SP) 


IS WAS IT XON? 


;HJD001 


014054 


001366 








BNE 


101 f 


1 |OH IF NOT 


inwA/ooi 


014056 








1021: 








M tf\BB t 


014056 


005726 








TST 


CSP)» 


; |FIX STACK 




014060 








101: 








;nJDOU^ 


014060 


105777 


165064 






TSTB 


••TPS 


\ iWAIT UNTIL PRINTER 15 READY 




014064 


100375 








BPL 


101 




iHJuOOl 


014066 


116677 


000002 


165056 




MOVB 


2CSP).8»TPB 


I BAB eft_« AB TB B f TvBf B T^TB BA T A BC ^ 

t iLOAO CMAH TO BE TYPED INTO DATA KEb. 




014074 


122766 


000015 


000002 




CMPB 


#Ch , 2( SP ) 


Ills CHAHACTtR A CARRIAGE RETURN? 




014102 


001003 








BNE 


It 


1 1 BRANCH IF NO 




014104 


105037 


014124 






CLRB 


ICMWfCNT 


C ^1 CAB OuAAA^TCD At T 

IjYtS- -CLEAR CHARACTER COLWT 




014110 


000406 








BR 


A T wn^ W 

•TYPfeX 


f W T T 

1 lEXIT 




014112 


122766 


000012 


000002 


11: 


CHPB 


e »> f en \ 

•LF.2(SP) 


T^ /^^ABA^TPB A t TA^T CTCCB') 

Ilia CHARACTER A LINE FEED? 




014120 


001402 








BEQ 


•TYPtX 


BBA^.^1^ TC wCC 

1 1 BRANCH IF YES 






10^22/ 








INCB 


roc ^ A 


1 1 UUIM I I nc U^MHMU 1 Cb 




014124 


000000 






ICHARCNT: .MRO 


0 


iiCHARACTER COUNT STORAGE 




014126 


000207 






•TYPEX: 


RTS 


PC 







.SBTTL APT COMHUNICATIONS ROUTINE 



014150 


112757 


000001 


014574 


•ATYl: 


MOVB 


♦l.»FFLG 


II TO REPORT FATAL ERROR 


014156 


112757 


000001 


014572 


•ATY5: 


novB 


•I.IMFLG 


II TO TYPE A MESSAGE 


014144 


000405 








BR 


• ATYC 




014146 


112757 


000001 


014574 


IATY4: 


MOVB 


#1 . »rPLG 


II TO ONLY REPORT FATAL ERROR 


014154 








•ATtC: 








014154 


010046 








MOV 


RO.-(SP) 


1 iPUSH RO ON STACK 


014156 


010146 








MOV 


Rl. (SP) 


1 iPUSH Rl ON STACK 


014160 


105757 


014572 






TSTB 


•MFLG 


M SHOULD TYPE A MESSAGE? 


014164 


001450 








BEQ 


5> 


ttIF NOT: BR 


014166 


122757 


000001 


001210 




CMPB 


•APTENV.tENV 


iiOPERATING UNDER APT? 


014174 


001051 








BNE 


5t 


iilF NOT: BR 


014176 


152757 


000100 


001211 




BITB 


*APTSPOOL.«ENVM 


It SHOULD SPOOL MESSAGES? 


014204 


001425 








BEQ 


5) 


iiIF NOT: BR 


014206 


017600 


000004 






MOV 


S4(SP).R0 


iiGET MESSAGE AOOR. 


014212 


062766 


000002 


000004 




AOO 


«2.4(SP) 


liBUMP RETURN AOOR. 


014220 


005757 


001170 




It: 


TST 


•MSGTYPE 


siSEE IF DONE U/ LAST XMISSION? 


014224 


001575 








BNE 


It 


II IF NOT: WAIT 


014226 


010057 


001204 






MOV 


RO.IMSGAO 


1 iPUT AOOR IN MAILBOX 


014252 


105720 






21: 


TSTB 


(RO)* 


llFINO END OF MESSAGE 



CvWCC '>*?vll.» C:4(. Ts' r»RM 
APT COMMUNICATIONS ROUMNf 



MACRO M1?C0 



OS 
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0142S4 


001376 








BNE 


21 


014236 


163700 


001204 






SUB 


$MSGA0.P0 


014242 


006200 








ASP 


PO 


014244 


010037 


001206 






MOV 


PO.IMSGLGT 


014250 


012737 


000004 


0011 70 




MOV 


#4, IMSGTYPt 


014256 


000413 








BP 


51 


014260 


017637 


000004 


014304 


3S: 


MOV 


a4CSP),4$ 


014266 


062766 


000002 


000004 




ADO 


^2.4{SP) 


014274 


013746 


177776 






MOV 


17 7776, -CSP) 


014300 


004737 


013574 






JSR 


PC. • TYPE 


014304 


000000 






41 : 


.UOPD 


0 


014306 








51: 






014306 


105737 


014374 




10$: 


TSTB 


$rFLG 


014312 


001416 








BEQ 


12$ 


014314 


005737 


001210 






TST 


$ENV 


014320 


001413 








BEQ 


12$ 


014322 


005737 


001170 




11$: 


TST 


$msgtype 


014326 


001375 








BNE 


11$ 


014330 


017637 


000004 


001172 




MOV 


84(SP), $FATAL 


014336 


062766 


000002 


000004 




ADO 


♦2.4(SP) 


014344 


005237 


001170 






INC 


$MSGTYPE 


014350 


105037 


014374 




12$: 


clrb 


$rrLG 


014354 


105037 


014373 






CLPB 


$LFLG 


014360 


105037 


014372 






CLRB 


$MrLG 


014364 


012601 








MOV 


(SP)*,P1 


014366 


012600 








MOV 


(SP)* .RO 


014370 


000207 








PTS 


PC 


014372 


000 






$MFLG: 


.BYTE 


0 


014373 


000 






♦*.FLG: 


.BYTE 


0 


014374 


000 






trr LG: 


.BYTE 


0 












.EVEN 






000200 






APTSIZE 


-200 






000001 






APTENV- 


001 






000100 






APTSPOOL-100 






000040 






APTCSUP 


•040 





2167 



tiSUe START OF MESSAGE 
liGET MESSAGE LHC^rn IN WORDS 
iiPUT LENGTH IN MAILBOX 
1 1 TELL APT TO TAKE MSG. 

i:PUT MSG AOOR IN JSk LINKAGE 
ilBUMP RETURN ADDRESS 
jlPUSH 177776 ON STACK 
J I CALL TTPE MACRO 

:t SHOULD REPORT FATAL ERROR? 

St IF NOT: BR 

I {RUNNING UNDER APT? 

iilF NOT: BR 

i (FINISHED LAST MESSAGE? 

it IF NOT: WAIT 

stGET ERROR • 

itBUMP RETURN AOOP. 
It TELL APT TO TAKE ERROR 
t {CLEAR FATAL FLAG 
SI CLEAR LOG FLAG 
s s CLEAR MESSAGE FLAG 
ssPOP STACK INTO Rl 
ssPOP STACK INTO RO 
s {RETURN 
ssMESSG. FLAG 
{(LOG FLAG 
{{FATAL FLAG 



.S8TTL BINARY TO OCTAL (ASCII) AND TYPE 



*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 6-OIGIT 
*OCTAL (ASCII) NUMBER AND TYPE IT. 

•ITYPOS-- -ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO T»PE 
*CALL: 

• MOV NUM.-(SP) {{NUMBER TO BE TYPED 

• TYPOS {jCALL FOR TYPEOUT 

• .BYTE N {{N-1 TO 6 FOR NUMBER OF DIGITS TO TYPE 

• .BYTE M ((M-l OR 0 

• {{1-TYPE LEADING ZEROS 

• (iO*SUPPRESS LEADING ZEROS 

•tTYPON ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 

•tTYPOS OR $TYPOC 
•CALL: 

• MOV NUM.-(SP) s {NUMBER TO BE TYPED 

• TYPON {{CALL FOR TVPEOUT 

•tTvPOC-- -ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 
•CALL: 

• MOV NUM.-(SP) t {NUMBER TO BE TrPED 



CV0»CC OWvUJ CIA»; Tsl PRIl nACRO M1?00 
BIHMT TO OCTAL (ASCII) AND TVPfc 
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2168 



014376 
014402 
014410 
014414 
014420 
014422 
014450 
014456 
014444 
014446 
014450 
014452 
014456 
014460 
014464 
014470 
014474 
014500 
014502 
014504 
014506 
014510 
014512 
014514 
014516 
014520 
014524 
014526 
014552 
014554 
014556 
014540 
014542 
014546 
014552 
014556 
014562 
014566 
014570 
014572 
014574 
014576 
014600 
014602 
014604 
014612 
014614 
014616 
014617 
014620 
014621 
014622 



017646 
116657 
112657 
062716 
000406 
112757 
112757 
112757 
010546 
010446 
010546 
115704 
005404 
062704 
110457 
115704 
016605 
005005 
006105 
000404 
006105 
006105 
006105 
010505 
006105 
105557 
100016 
042705 
001002 
005704 
001405 
005204 
052705 
052705 
110557 
104401 
105557 
005547 
002402 
005204 
000744 
012605 
012604 
012605 
016666 
012616 
000002 
000 
000 
000 
000 
000000 



000000 
000001 
014625 

000002 

000001 
000006 
000005 



014625 

000006 
014622 
014621 
000012 



014621 



014621 
014625 
014620 



014622 
177770 



000060 
000040 
014616 
014616 
014620 



000002 000004 



»T»POS: 



»TyPOC: 
irrPON: 



IS: 
2t; 

5«: 



4$: 

5»: 

7»: 



6«: 



8t: 



♦OCNT: 
lOFiLL: 
lOMOOE: 
.SBTTL 



TYPOC 
MOV 

novB 

MOVB 

ADD 

BR 

MOVB 

MOVB 

MOVB 

MOV 

MOV 

MOV 

MOVB 

NEC 

ADD 

MOVB 

MOVB 

MOV 

CLR 

ROL 

BR 

ROL 

ROL 

ROL 

MOV 

ROL 

OECB 

BPL 

BIC 

BNE 

TST 

BEQ 

INC 

BIS 

BIS 

MOVB 

TYPE 

DECS 

BGT 

BLT 

INC 

BR 

MOV 

MOV 

MOV 

MOV 

MOV 

RTI 

• BYTE 

.BYTE 

.BYTE 

.BYTE 

.WORD 

CONVERT 



5 ;CALL rOR TYPE OUT 
1 1 PICKUP THE MODE 
jiLOAO ZERO FiLc SWITCH 
jjNUMBER OF DIGITS TO TYPE 
; I AD JUST RETURN ADDRESS 

i;SET THE ZERO FILL SWITCH 
2;SET FOR SIX(6) DIGITS 
:jSET the ITERATION COUNT 
i:SAVE R5 
taSAVE R4 
iiSAVE RS 

jjGET THE NUMBER OF DIGITS TO TYPE 

11 SUBTRACT IT FOR MAX. ALLOWED 
it SAVE IT rOR USE 
jjGET THE ZERO FILL SWITCH 
: I PICKUP THE INPUT NUMBER 
({CLEAR THE OUTPUT WORD 
J t ROTATE MSB INTO "C" 
I iGO DO MSB 
;,FORM THIS DIGIT 



a(SP). (SP) 
1(SP).»0FILL 
(SP)*.«GM00E*1 
♦2.(SP) 
♦TYPON 
♦I.IOFILL 
«6.tOMOOE*l 
•5.»0CNT 
R5.-(SP) 
R4.-(SP) 
R5.-(SP) 
»0M00E»1.R4 
R4 

«6.R4 
R4.$0M0DE 
»0FILL.R4 
12(SP).R5 
R5 
R5 
5t 
R5 
R5 
R5 

R5.R5 
R5 

tOMOOE 
7t 

♦177770. R5 
4> 
R4 
5$ 
R4 

♦•0.R5 
.R5 
R5.8< 
.81 
>0CNT 
2t 
6» 
R4 
2* 

CSP)».R5 
(SP)».R4 
(SP)»,R5 
2(SP).4(SP) 
(SP)».CSP) 

0 
0 
0 
0 
0 

BINARY TO DECIMAL AND 1YPE ROUTINE 



GET LSB OF THIS DIGIT 
TYPE THIS DIGIT? 
BR IF NO 
GET RIO OF JUNK 
TEST FOR 0 
SUPPRESS THIS 0? 
BR IF YES 

DON'T SUPPRESS ANYMORE OS 
MAKE THIS DIGIT ASCII 
MAKE ASCII IF NOT ALREADY 
SAVE FOR TYPING 
GO TYPE THIS DIGIT 
COUNT BY 1 
BR IF MORE TO DO 
BR DONE 

INSURE LAST DIGIT ISN* T A BLANK 
GO DO THE LAST DIGIT 
RESTORE R5 
RESTORE R4 
RESTORE R5 

SET THE STACK FOR RETURNING 
RETURN 

STORAGE FOR ASCII DIGIT 
TERMINATOR FOR TYPE ROUTINE 
OCTAL DIGIT COUNTER 
ZERO FILL SWITCH 
NUMBER OF DIGITS TO TYPE 



t*THlS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 5-DIGIT 
{•SIGNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 



r ^ 
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CONVERT BINARt TO DECIMAL AND TyPE ROUTINE 

:«NUMBER IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN UILl BE TfPED 
:*BEFORE THE FIRST DIGIT OT THE NUMBER. LEADING ZEROS WILL ALUArS BE 
; •REPLACED WITH SPACES. 
; ♦CALL : 











' 


HAU 


MM . f QP ^ 


• iPllT THF RfMAPf MMtPP AM THF <;TArK 
















1 iCA TA THF PAUTTMF 


/M 

0l#O^# 


















vxuv^o 








HAU 


QA - f QP 


• 9 PUSH RA AM STA^K 




A£^ 








HAU 


PI . r QP ^ 

X » \ 9^ / 


• -PUSH PI AM STAfK 




C\ \ (\OAfs 
UXWc^O 










RP . r ^p 

~C » V 9^ J 


1 •PUSH RP ON STACK 




A1 OX4A 








HAU 




t tPUSH R3 ON STACK 




A1 AS4A 








HAU 


Rs - r SP ) 


1 iPUSH RS ON STACK 




A1 074i^ 

UXc t 


APAPAA 






HAU 


4PAPAA > r SP ^ 


ttSET BLANK SWITCH AND SIGN 




A1#IAA^ 
vxoov^ 


AAAAPA 






HAU 


porsp) RS 


1 2 GET THE INPUT NUMBER 




1 AAAA4 








BPL 


1 i 

X • 


1 iBR IF INPUT IS POS 




AA^AS 








r¥^vj 


RS 


t xMAKE The BINARY NUMBER POS 




X XC r 


AAAASS 


AAAOA1 

VWW X 




HOUR 


- If SP^ 


X 2 MAKE THE ASCII NLtfiER NEG 




AASAAO 






1 i • 

X 9 • 


riR 


RO 


I-7ER0 THE CONSTANTS INDEX 


A1 AMP 


A1P7A^ 

VXC r 


A1SA4A 






MOV 


^IDRLK R3 


•t SETUP THE OUTPUT POINTER 




1 1 P7PX 
X XC r 


AAAA4A 






HAWR 




2tSET THE FIRST CHARACTER TO A BLANK 




AASAAP 






Pi • 


CLR 


R2 


2 t CLEAR THE BCD NUMBER 




AII^AAI 


A1SAYA 






HAV 


iOTRL TRO) Rl 


z xGET The constant 




1 AA1 A^ 








9wO 


Rl RS 


i iFORM THIS BCD DIGIT 




AAP4AP 










A i 


. .RR TF DONE 












xri^ 


pp 


••TMTRFASF THE RCD DIGIT RY I 


A1 A7nA 










RP 






A1 A71 A 

f Xw 


AI^AI A^ 






4i • 


AAA 


Rl RS 


t tADD RACK THE CONSTANT 


ni A71 D 

V/X^ r Xc 


AA^7AD 








TST 


PP 


t t CHECK IF RCD DIGIT aO 

1 1 ^*^bV*«^ X* OV»t^ WXVIX ■ V 


A1 A7 1 A 
VX^ f x^ 


AA1 AAP 










Si 


X tFALL THROUGH IF 0 


ni A71 A 

UX^ r XO 


XUD r XO 








TSTR 


X 9^ i 


ft STILL DOING LEADING 0' S' 


A1 A70A 
WX^ ' 


1 AA4A7 








RHT 


7i 


1 tRR TF YFS 

1 1 D~ X' > w9 


A1 A7P9 


Xl/OOXO 








ASLR 


V 9^ / 


1 iMSD? 


\J X^ » 


1 AW)X 








Rrr 


61 


1 zRR IF NO 


yj x^ ' CO 


xxoooo 


AAAAA1 


1 77777 

X r r r r > 




HAuR 


X % 9~ 3 % "XVr^Jy 


iiYES-'SET THE SIGN 


VX" f 


ASP7AP 


AAAAAA 




o • • 


RTQ 
ox w 


4' A RP 


1 2MAKE THE BCD DIGIT ASCII 

1 § ■ fnv>w ■ wv«v/ wxwX ■ ^wVvX x 


A1 A7AA 

VX^ f ^ w 


ASP7AP 


AAAA4A 




7i - 


RTS 

DX3 


4' RP 


t I MAKE IT A SPACE IF NOT ALREADY A DIGIT 


At A7AA 

VX" • 


1 1 APPX 
X XVCCO 








MAUR 


RP rpsi* 


•tPUT THIS CHARACTER IN THE OUTPUT BUFFER 


A1 A7A#^ 


AAS7PA 








TST 


rpA^ • 


1 t JUST INCREMENTING 


A1 A7^ 

VX^ f 3V 


APAAP7 


AAAA1 A 
WW XV 






fMP 


PA 41 A 

w\\J f w XV/ 


t 1 CHECK THE TABLE INDEX 




AAP74A 
WC f ^o 








RLT 


Pi 


x *G0 DO THE NEXT DIGIT 

} # U w Vw 1 ' *W i^w^ ■ wXVJX ■ 


VX~ » a^D 










RCT 


Ai 

o* 


t 2GO TO EXIT 

1 \ U w • w w ^ X 1 


VX~ » wV 


At ASAP 








HAV 


RS RP 


t xGET THE LSD 




000764 








RR 


6i 


iiGO CHANGE TO ASCII 


014764 


1AS7P6 

X V CO 






Ai • 
O* • 


TSTR 

1 9 1 D 


\ 9r^ ^ • 


•lUAS THE LSD THE FIRST NON-ZERO? 

g f OT^w i W WW ■ r^w * X" w ■ *vw*^ wn W * 


014766 


xww^ 








RPL 


91 


t sBR IF NO 


014770 


116663 


177777 


177776 




MOVB 


-KSP). -2(R3) 


SI YES- -SET THE SIGN FOR TYPING 


014776 


105013 








CLR6 


(R3) 


11 SET THE TERMINATOR 


015000 


012605 








MOV 


(SP)-.R5 


uPOP STACK INTO R5 


01S002 


012603 








MOV 


(SP)*.R3 


,iPOP STACK INTO R3 


015004 


012602 








MOV 


(SP)^.R2 


;jPOP STACK INTO R2 


015006 


012601 








MOV 


(SP)*.R1 


ttPOP STACK INTO Rl 


015010 


012600 








MOV 


(SP)*.RO 


\ iPOP STACK INTO RO 


015012 


104401 


015040 






TYPE 


.IDBLK 


: iNOU TYPE THE NUMBER 


015016 


016666 


000002 


000004 




MOV 


2(SP).4(SP) 


;s AO JUST THE STACK 


015024 


012616 








MOV 


(SP)*.(SP) 




015026 


000002 








RTI 




ss RE TURN TO USER 


015030 


023420 






lOTBL: 


10000. 
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CONVERT BINARt TO DECIMAL AND TvPE ROUTINE 



SEQ OOM 



>169 



015032 001750 

015054 000144 

015056 000012 
015040 



2170 
2171 
2172 
2175 
2174 
2175 
2176 
2177 



1000. 

100. 

10. 

$DBU<: .BLKy 4 

.SBTTL ERROR HANDLER ROUTINE 



SETHIS ROUTINE WILL INCREMENT THE ERROR TLAG AND THE ERROR COUNT, 
;*SAVE THE ERROR ITEM NUMBER AND THE ADDRESS OT THE ERROR CALl 
;*AM) GO TO SURCK ON ERROR 

;*THE SWITCH OPTIONS PROVIDED BT THIS ROUTINE ARE: 



5*SW15-1 
;*SW15-1 
s*SW09-l 
; *CALL 



HALT ON ERROR 
INHIBIT ERROR TtPEOUTS 
LOOP ON ERROR 













ERROR 


N :;ERROR- 


EMT AND N-ERROR ITEM NUMBER 


015050 








lERROR: 








015050 


104407 








CKSWR 




;;TEST FOR CHANGE IN SOFT SWR 
FOR SWR CHANGE 


015052 


104407 








CKSWR 


:G0 LOOK 


015054 


105257 


001105 




71: 


INCB 


$ERFLG 


;;SET THE ERROR FLAG 


015060 


001775 








BEQ 


7$ 


;jDON'T LET THE FLAG GO TO ZERO 


015062 


015777 


•001102 


164052 




MOV 


$TSTNM.aOISPLAY 


;;DISPLAY TEST NUMBER AND ERROR FLAG 


015070 


005257 


001112 






INC 


$ERTTL 


;3lNC THE ERROR COUNT 


015074 


011657 


001116 






MOV 


(SP).$ERRPC 


:iGET ADDRESS OF ERROR INSTRUCTION 


015100 


162757 


000002 


001116 




SUB 


«2,$ERRPC 




015106 


117757 


164004 


001114 




MOVB 


8$ERRPC.$ITEMB 


;;STRIP AND SAVE THE ERROR ITEM CODE 


015114 


052777 


020000 


164016 




BIT 


MIT15.8SWR 


; J SKIP TYPEOUT IF SET 


015122 


001004 








BNE 


20$ 


J ;SKIP TYPEOUTS 


015124 


004757 


015224 






JSR 


PC • SWRCK 


;sGO TO USER ERROR ROUTINE 


015150 


104401 


001165 






TYPE 


.$CRLF 




015154 








20$: 








015154 


122757 


000001 


001210 




CMPB 


«APTENV.$ENV 


t {RUNNING IN APT MODE 


015142 


001007 








BNE 


2$ 


j:NO.SKIP APT ERROR REPORT 


015144 


115757 


001114 


015156 




MOVB 


$ITEMB.21$ 


tsSET ITEM NUMBER AS ERROR NUMBER 


015152 


004757 


014146 






JSR 


PC.$ATY4 


;iREPORT FATAL ERROR TO APT 


015156 


000 






21$: 


.BYTE 


0 




015157 


000 








.BYTE 


0 




015160 


000777 






22$: 


BR 


22$ 


tsAPT ERROR LOOP 


015162 


005777 


165752 




2$: 


TST 


8SWR 


uHALT ON ERROR 


015166 


100002 








BPL 


5$ 


SI SKIP IF CONTINUE 


015170 


000000 








HALT 




iiHALT ON ERROR! 


015172 


104407 








CKSWR 




s}TEST FOR CHANGE IN SOFTSWR 


015174 


052777 


001000 


165756 


5$: 


BIT 


«BIT09.8SWR 


};LOOP ON ERROR SWITCH SET? 


015202 


001402 








BEQ 


4$ 


} iBR IF NO 


015204 


015716 


001110 






MOV 


$LPERR.(SP^ 


t iFUDGE RETURN FOR LOOPING 


015210 


005757 


001162 




4$: 


TST 


$ESCAPE 


; {CHECK FOR AN ESCAPE ADDRESS 


015214 


001402 








BEQ 


5$ 


»iBR IF NONE 

iiFUOGE RETURN ADDRESS FOR ESCAPE 


015216 


015716 


001162 






MOV 


$ESCAPE.(S>) 


015222 








5$: 








015222 


000002 








RTI 




s t^ETURN 



I GO TYPE ERROR 

tGO UPDATE SOFTWARE SUR IF 'CNTRL/G' 



015224 113737 001102 001362 

015232 004737 015242 

015236 104407 

015240 000207 



SWRCK: 



MOVB 
JSR 
CKSWR 
RTS 



♦ TSTFtl. rSTNUM 

pc.teiwryp 

PC 



I SET UP TEST ♦ ON ER 
»G0 TYPE ERROR 
{GO LOOK FOR SWR CHANGE 
tRFTURN TO ERROR HANDLER 



CVORCC ORVllJ CXAi; TST PRTI 
ERROU NESSME TtPEOUT RCX^'INt 
^178 

015?42 
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.SBTTL ERROR MESSAGE TYPEOUT ROUTINE 



;-»TMIS ROUTINE USES THE "ITEM 
s*ERROR IS TO BE REPORTED. IT 
:*AND REPORTS THE APPROPRIATE 
tERRTYP: 



2179 



015242 


104401 


001165 




TYPE 


. ICBLF 


015246 


010046 






NOV 


RO. CSP) 


015250 


005000 






CLR 


RO 


015252 


153700 


001114 




BISB 


a««£TEMB,RO 


015256 


001004 






BNE 


1$ 


015260 


015746 


001116 




MOV 


JERRPC. CSP) 


015264 


104402 






TYPOC 




015266 


000426 






BR 


6< 


015270 


005300 




1*: 


DEC 


RO 


015272 


006300 






ASL 


RO 


015274 


006300 






ASL 


RO 


015276 


006300 






ASL 


RO 


015300 


062700 


001252 




ADO 


♦lERRTB.RO 


015304 


012037 


015314 




nov 


(R0)*.2* 


015310 


001404 






BEQ 


31 


015312 


104401 






TYPE 




015314 


000000 




2«: 


.WORD 


0 


015316 


104401 


001165 




TYPE 


.ICRLF 


015322 


012037 


015332 


31: 


HOV 


(R0)*.4t 


015326 


001404 






BEQ 


5t 


015330 


104401 






TYPE 




015332 


000000 




4t: 


.UORO 


0 


015334 


104401 


001165 




TYPE 


. ICRLF 


015340 


011000 




5t: 


nov 


CRO).RO 


015342 


001004 






BNE 


7$ 


015344 


012600 




6t: 


nov 


(SP)*.RO 


015346 


104401 


001165 




TYPE 


.♦CRLF 


015352 


000207 






RTS 


PC 


015354 






7«: 






015354 


013046 






MOV 


8(R0)*.-(SP) 


015356 


104402 






TYPOC 




015360 


005710 






TST 


(RO) 


015362 


001770 






BEQ 


61 


015364 


104401 


015372 




TYPE 


.8t 


015370 


000771 






BR 


71 


015372 


040 


040 


000 8t: 


.ASCIZ 


/ / 










.EVEN 





CONTROL SITE- («ITEMB) TO DETERMINE MHICM 
THEN OBTAINS. FROM THE "ERROR TABLE" f ICRRTB « 
INFORMATION CONCERNING THE ERROR. 

j;'CARRIACL RETURN" 6 "LINE FEED' 
iiSAVE RO 

;jPICKUP THE ITEM INDfex 

J! IF ITEM NUMBER IS ZERO. JUST 
tiTYPE THE PC OF THE ERROR 
: I SAVE iERRPC FOR TrPEOUT 
:tERROR ADDRESS 

:sGO TYPE- OCTAL ASCIKALL DIGITS) 
(iGET OUT 

; (ADJUST THE INDEX SO THAT IT UILL 
s: WORK FOR THE ERROR TABLE 



tiFORM TABLE POINTER 

t (PICKUP "ERROR MESSAGE" POINTER 

({SKIP TYPEOUT IF NO POINTER 

{{TYPE THE "ERROR MESSAGE' 

({"ERROR MESSAGE" POINTER GOES HERE 

({"CARRIAGE RETURN" C "LINE FEED" 

({PICKUP "DATA HEADER" POINTER 

((SKIP TYPEOUT IF C 

((TYPE THE "DATA HEADER" 

(("DATA HEADER" POINTER GOES HERE 

{("CARRIAGE RETURN" C "LINE FEED" 

{{PICKUP "DATA TABLE" POINTER 

{{GO TYPE THE DATA 

({RESTORE RO 

(("CARRIAGE RETURN" £ "LINE FEED" 
((RETURN 

((SAVE 8(R0)* FOR TYPEOUT 

((GO TYPE—OCTAL ASCIKALL DIGITS) 

((IS THERE ANOTHER NUMBER? 

((BR IF NO 

{{TYPE TU0(2) SPACES 
((LOOP 

{{TU0(2) SPACES 



.SBTTL SCOPE HANDLER ROUTINE 



(*THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT UILL INCREMENT 

(*ANO LOAD THE TEST NUNBERC ITSTMI) INTO THE DISPLAY REG.(DISPLAY<7:0> ) 

(*AND LOAD THE ERROR FLAG (•ERTLG) INTO DISPLAY < 15 :06> 

(*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

(*SU14-1 LOOP ON TEST 

{*SU11-1 INHIBIT ITERATIONS 

{*SU09-1 LOOP ON ERROR 

(*SU08-1 LOOP ON TEST IN SUR<7:0> 

{ *CALL 

{• SCOPE {( SCOPE -lOT 
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CIAj; TSt 


PRTl 
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SCOPE HANDLER ROUTINE 
















015376 








$ SCOPE: 










015376 


104407 












• 




015400 


03277 7 


04 WOO 


163552 


1$: 


BIT 


Vol 1 14 • V^WH 


I 


jLOOP ON PRESENT TEST? 


015406 


001114 








BNE 




1 


lYES IF SW14-1 










:^*^^^START OT 


rnnc cod tuc vad 


TESTER^^^^^ 


015410 


000416 






IXTSTR: 


BR 


O 9 


: 


















1 




015412 


013746 


000004 






MOV 


OMrtKKVC.Lt V i 


t 


i^AVF THE CONTENTS Of THE FRROR wFrTOR 


015416 


012737 


/M XJi 


000004 




MOV 




• 


iSET FOR TIMEOUT 


015424 


005737 


1 f ( UoO 






TST 


ajt 1 7 7 AAA 


• 


•TIME OUT ON XOR > 


015430 


012637 








MOV 




ff 


sRESTORE THE ERROR VECTOR 


015434 


000463 








BR 






iGO TO THE NEXT TEST 


015436 


022626 






5$: 


CMP 


f CD * r CD A 




1 CLEAR THE STACK AFTER A TIME OUT 


015440 


012637 


iA/000«» 






MOV 


CSP)*,a^RRVEC 




iRESTORE THE ERROR VECTOR 


015444 


000423 








BR 


7$ 




iLOOP ON THE PRESENT TEST 


015446 








6I:;^^^««END OF CODE FOR THE XOR 


TESTER*^^^^ 


015446 


032777 




165464 




BIT 


MITOB.aSUR 




:LOOP ON SPEC. TEST? 


015454 


001404 








BEQ 


21 




sBR IF NO 


015456 


127737 


1 AXA^JL 


001102 




CMPB 


SSWR. ITSTNM 




lON THE RIGHT TEST? SUR<7*0> 


015464 


001465 








BEQ 


lOVER 




sBR IF YES 


015466 


105737 


/V>1 1 f%X 
UUllOd 




2$ : 


TSTB 


lERFLG 




2 HAS AN ERROR OCCURRED '> 


015472 


001421 








BEQ 


51 




;BR IF NO 


015474 


123737 




001105 




CMPB 


lERMAX . lERFLG 




zMAX ERRORS FOR THIS TEST OCCURRED'' 


015502 


101015 








BHI 


51 




iBR IF NO 


015504 


032777 


AA1 AAA 


165426 




BIT 


#BIT09.aSUR 




• LOOP ON ERROR? 

f WW* t""Wr^ i 


015512 


001404 








BEQ 


41 




sBR IF NO 


015514 


013737 


AA1 1 1 A 


001106 


71: 


MOV 


tLPERR. <LPAOR 




IsET LOOP ADDRESS TO LAST SCOPE 


015522 


000446 








BR 


tOVER 






015524 


105037 


AA1 1 AV 




4$: 


CLR6 


tERTLG 




i2ER0 The error flag 


015530 


005037 


AAl 1 ^A 






CLR 


♦TIMES 




t clear the NUMBER OF ITERATIONS TO MAKE 


015534 


000415 








BR 


11 




lESCAPE TO T^C NEXT TEST 


015536 


032777 


AAA AAA 

OU4UW 


165574 


5$: 


BIT 


4BIT11.0SUR 




1 INHIB IT I TERAT IONS 


015544 


001011 








BNE 


11 




sBR IF YES 


015546 


005737 


AAl 1 7^ 






TST 


•PASS 




tIF FIRST PASS OF PROGRAM 


015552 


001406 








BEQ 


It 




s INHIBIT ITERATIONS 


015554 


005237 


AA« « AA 






INC 


$ICNT 




t INCREMENT ITERATION COUNT 


015560 


023737 


AAl 1 ^A 


001104 




CMP 


♦TIMES. •ICNT 




1 CHECK THE NUMBER OF ITERATIONS MADE 


015566 


002024 






BGE 


♦OVER 




iBR IF MORE ITERATION REQUIRED 

J W'' X» ^^^W X 1 1 X%^ V WX'^WW 


015570 


012737 


AAAAA1 


001104 


11: 


MOV 


♦I. ♦ICNT 




iREINITIALIZE THE ITERATION COUNTER 


015576 


013737 


U130D4 


001160 




MOV 


♦MXCNT.tTIMES 




iSET NUMBER OF ITERATIONS TO 00 


015604 


105237 


AAl 1 AO 




ISVLAO: 


INCB 


♦TSTNM 




i COUNT TEST NUMBERS 


015610 


113737 


AAl 1 AO 

OOIIOc 


001174 




M0V6 


♦TSTNM.^TESTN 




tSET TEST NUMBER IN APT MAILBOX 


015616 


011637 


AAi 1 A^ 

OOIlOo 






MOV 


(SP).^LPAOR 




tSAVE SCOPE LOOP ADDRESS 


015622 


011637 


AAi i 1 A 
OOlllO 






MOV 


(SP). tLPERR 




iSAVE ERROR LOOP ADDRESS 


015626 


005037 


AAl 1 ^O 






CLR 


♦ESCAPE 




t CLEAR TME ESCAPE FROM ERROR ADDRESS 


015632 


112737 


AAAAA1 


001115 




MOVB 


«1,^ERMAX 




(ONLY ALLOW ONE(l) ERROR ON NEXT TEST 


015640 


013777 


AAl 1 AO 


165274 


lOVER: 


MOV 


♦TSTNM.aOISPLAY 




t DISPLAY TEST NUMBER 


015646 


013716 


AAl 






MOV 


♦LPAOR.CSP) 




t FUDGE RETURN ADDRESS 


015652 


000002 








RTI 






1 FIXES PS 


015654 


000062 






IflXCNT: 


50. 






iMAX. NUMBER OF ITERATIONS 


2160 








.SBTTL 


TTY INPUT ROUTINE 







!enabl lsb 



;*S0FTUARE SWITCH REGISTER CHANGE ROUTINE. 

s*R0UTINE IS ENTERED FROH THE TRAP HANDLER. AND WILL 

s*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CALL 
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SF- 0061 

TT> INPUT ROUTINE 



;»WHEN OPERATING IN TTY FLAG MODE. 









001 140 




CHP 


^SUREG . SUR 


12 IS THE SOFT-SUR SElECTEO"* 












BNE 


15$ 


I {BRANCH IF NO 




105777 
^y/j III 


163252 






TSTB 


9ITKS 


: t CHAR THERE 7 




100071 








BPL 


15$ 


:2lF NO. DON'T WAIT AROUND 




117746 


163246 






MOVB 


aiTKB, (SP) 


; : SAVE THE CHAR 






177600 






BIC 


♦fC177.CSP) 


jiSTRIP-QFF THE ASCII 




0PP726 


000007 






CflP 


07. (SP)* 


J ;IS IT A CONTROL G? 


015710 


001062 








BNE 


15$ 


; sNO. RETURN TO USER 


015712 


123727 


001134 


000001 




CHPB 


lAUTOB.Ol 


;;ARE UE RUNNING IN AUTO-HODE? 


015720 


001456 








BEQ 


15$ 


i;BRANCH IF YES 


015722 


104401 


016413 






TYPE 


. $CNTLG 


{jECHO THE CONTROL -G (^G) 


015726 


104401 


016420 




IGTSUR: 


TYPE 


, $HSUR 


s 2 TYPE CURRENT CONTENTS 


015732 


013746 


000176 






HOV 


SUREG. (SP) 


liSAVE SUPEG FOR TYPEOUT 


015736 


104402 








TYPOC 




2;G0 TYPE—OCTAL ASCIKALL DIGITS) 


015740 


104401 


016431 






TYPE 


. $HNEW 


iiPROHPT FOR NEW SWR 


015744 


005046 






19$: 


CLR 


(SP) 


CLEAR COUNTER 


015746 


005046 








CLR 


(SP) 


s;THE NEW SWP 


015750 


105777 


163170 




7i: 


TSTB 


fi$TKS 


; sCHAR THERE? 


015754 


100375 








BPL 


7$ 


mIF NOT TRY AGAIN 


015756 


117746 


163164 






nOVB 


8$TKB. -(SP) 


IS PICK UP CHAR 


015762 


042716 


177600 






BIC 


OtC177.(SP) 


s SHAKE IT 7 -BIT ASCII 


015766 


021627 


000025 




91 : 


C^*> 


(SP),025 


;3lS IT A CONTROL-U? 


015772 


001005 








BNE 


10$ 


I {BRANCH IF NOT 


015774 


104401 


016406 






TYPE 


. $CNTLU 


J. -YES, ECHO CONTROL-U (^U) 


016000 


062706 


000006 




20i: 


ADD 


#6.SP 


iilC^NORE PREVIOUS INPUT 


016004 


000757 








BR 


19$ 


siLET'S TRY IT AGAIN 


016006 


021627 


000015 




101: 


CHP 


(SP).015 


1 lis IT A <CR>? 


016012 


001022 








BNE 


16$ 


; {BRANCH IF NO 


016014 


005766 


000004 






TST 


4(SP) 


{{YES, IS IT THE FIRST CHAR? 


016020 


001403 








BEQ 


11$ 


{{BRANCH IF YES 


016022 


016677 


000002 


163110 




HOV 


2(SP).8SUR 


{ { SAVE NEW SWR 


016030 


062706 


000006 




Hi: 


ADD 


06. SP 


1 {CLEAR UP STACK 


016034 


104401 


001165 




141: 


TYPE 


. $CPLF 


{{ECHO <CR> AND <LF> 


016040 


123727 


001135 


000001 




CHPB 


$INTAG.01 


{ {RE -ENABLE TTY KBD INTERRUPTS? 


016046 


001003 








BNE 


15$ 


{{BRANCH IF NOT 


016050 


012777 


000100 


163066 




HOV 


0100.S$TKS 


{{RE -ENABLE TTY KBD INTERRUPTS 


016056 


000002 






151: 


RTI 




{ {RETURN 


016060 


004737 


014006 




161 : 


JSP 


PC. $TYPEC 


{{ECHO CHAR 


016064 


021627 


000060 






CHP 


(SP).#60 


{ {CHAR < 07 


016070 


002420 








BLT 


18$ 


{{BRANCH IF YES 


016072 


021627 


000067 






CHP 


(SP)«067 


{{CHAR > 7? 


016076 


003015 








BGT 


18$ 


{{BRANCH IF YES 


016100 


042726 


000060 






BIC 


060.(SP)« 


{{STRIP -OFF ASCII 


016104 


00S766 


000002 






TST 


2(SP) 


{{IS THIS THE FIRST CHAR 


016110 


001403 








BEQ 


17$ 


{{BRANCH IF YES 


016112 


006316 








ASL 


(SP) 


{{NO. SHIFT PRESENT 


016114 


006316 








ASL 


(SP) 


1 1 CH/W OVER TO MAKE 


016116 


006316 








ASL 


(SP) 


, 1 ROOM FOR NEU ONE . 


016120 


005266 


000002 




171: 


INC 


2(SP) 


liKEEP COUNT OF CHAR 


016124 


056616 


177776 






BIS 


-2(SP).(SP) 


II SET IN NEU CHAR 


016130 


000707 








BR 


7$ 


ilGET THE NEXT ONE 


016132 


104401 


001164 




181: 


TYPE 


.$auES 


iiTYPE ?<CR><LF> 


016136 


000720 








BR 


20$ 


i {SIMULATE CONTROL-U 










.DSABL 


LSB 














;»THIS 


ROUTINE 


WILL INPUT A 


SINGLE CHARACTER FROM THE TTY 
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ru INPUT ROUTINE 

s*CALL: 

RDCHR 

RETURN HERE 



016140 


011646 






• 

IRDCHR: 


MOV 


( SP J , C SP J 


016142 


016666 


000004 


000002 




MOV 


4(SP J.2CSP) 


016150 


105777 


162770 




IS : 


TSTB 


SITKS 


016154 


100375 








BPL 


It 


016156 


117766 


162764 


000004 




MOVB 


•ITKB.4(SP) 


016164 


042766 


177600 


/X AAAAii 

000004 




a ▼ A 

BIC 


^*C<177> ,4CSP J 


016172 


026627 


000004 


AAAA'^ V 

000023 




CMP 


M f pa N AO V 

4(SP).^23 


016200 


001013 








BNE 


31 


016202 


105777 


162736 




21 : 


TSTB 


SITKS 


016206 


100375 








BPL 


21 


016210 


117746 


162732 






MOVB 


SITKB* -CSP) 


016214 


042716 


177600 






a T A 

BIC 


A*A4 77 CD ^ 

• *C177, 1 SP J 


016220 


022627 


000021 






CMP 


(SP)«.«21 


016224 


001366 








BNE 


21 


016226 


000750 








aa 

BR 


1* 


01623(0 


026627 


000004 


AAAA^ 4 

000021 


31 : 


AMD 

CMP 




016236 


001744 








ap A 




016240 


026627 


000004 


000140 




CMP 


4(SP).*140 


016246 


002407 








BLT 


4f 


016250 


026627 


AAA AAA 
000004 


AAA* <g 

000175 




CMP 


4(SP).#175 


016256 


003003 








BGT 


4t 


016260 


042766 


AAA A A A 

000040 


A A A A A A 

000004 




BIC 


#40.4(SP) 


016266 


000002 






4$ : 


RTI 












SETHIS 


ROUTINE 


UILL INPUT A STI 










s *CALL : 
















RDLIN 












s* 


RETURN HERE 


016270 


010346 






IRDL IN: 


MOV 


R3,-(SP) 


016272 


012703 


016376 




11 : 


MOV 


♦$TTYIN.R3 


A 4 ^^^^ 

016276 


022703 


A« M AiC 

016406 




21: 


CMP 


»$TTYIN*8..R3 


016302 


101405 








BLOS 


4$ 


016304 


104410 








RDCHR 




/\« ^ VAC 

016306 


112613 








MOVB 


(SP)».(R3) 


016310 


122713 


000177 




101: 


crPB 


♦177. (R3) 




AA 4 A/W 

001003 








BNE 


31 


016316 


1 AA ^ A« 

104401 


AA« « f ii 

001164 




41 : 


TYPE 


.<QUES 


016322 


000763 








BR 


1« 


016324 


111337 


016374 




3S : 


MOVB 


(R3).9I 


A1 ^ WA 

016330 


104401 


016374 






TYPE 


.9» 




Icc 








CMPB 


•15. (RS)* 


016540 


001356 








BNE 


2> 


016S42 


105065 


177777 






CLRB 


-1(R3) 


016346 


104401 


001166 






TYPE 


.»LF 


016352 


012603 








MOV 


(SP)».R3 


016354 


011646 








MOV 


(SP).-(SP) 


016356 


016666 


000004 


000002 




MOV 


4(SP).2( SP) 


016364 


012766 


016376 


000004 




MOV 


♦$TTYIN.4(SP) 


016372 


000002 








RTI 




016374 


000 






9$: 


.BYTE 


0 


016375 


000 








.BYTE 


0 



I J INPUT A SINGLE CHARACTER fRQH Tnt r'. 
, {CHARACTER IS ON THE S^ACK 
stUITH PARITY BIT STRIPPED Of r 

iiPUSH DOWN THE PC 

ttSAVE THE PS 

SlUAIT FOR 

iiA CHARACTER 

iiREAD THE TTY 

isGET RIO or JUNK ir ANY 

tilS IT A CONTROL S? 

t {BRANCH IF NO 

:sUAIT FOR A CHARACTER 

:iLO0P UNTIL ITS THERE 

tiGET CHARACTER 

:iMAKE IT 7-BIT ASCII 

:>IS IT A CONTROL -Q? 

:tIF NOT DISCARD IT 

ttYES. RESUME 

lilS IT A RANDOM XON? (RANOOl 

:: BRANCH IF YES (RANOOl 

;!lS IT UPPER CASE? 

stBRANCH IF YES 

tjIS IT A SPECIAL CHAR? 

ttBRANCH IF YES 

sjMAKE IT UPPER CASE 

tiGO BACK TO USER 



NG FROM THE TTY 

It INPUT A STRING FROM THE TTY 

iiADORESS OF FIRST CHARACTER UILL BE ON THE STACK 

ttTERMINATOR UiLL BE A BYTE OF ALL 0' S 

tsSAVE R3 

itGET ADDRESS 

jiBUFFER FULL? 

8»BR IF YES 

ttGO READ ONE CHARACTER FROM THE TTt 
ttGET CHARACTER 
ttIS IT A RUBOUT 
llSKIP IF NOT 
,,TYPE A •?• 

} (CLEAR THE BUFFER AND LOOP 
siECHO THE CHARACTER 

: (CHECK FOR RETURN 
((LOOP IF NOT RETURN 
((CLEAR RETURN (THE 15) 
((TYPE A LINE FEED 
((RESTORE R3 

((ADJUST THE STACK AND PUT ADDRESS OF THE 
II FIRST ASCII CHARACTER ON IT 

t (RETURN 

( (STORAGE FOR ASCII CHAR. TO TYPE 
1 1 TERMINATOR 



CVO«CC OHVllJ PIAi, TSI PRll 
Tt> INPUT ROUTINE 
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%EQ 006! 



2181 



016576 








tTTVlN: 


.BLKB 


8. 


016406 


136 


125 


015 


♦CNTLU; 


.ASCIZ 


/♦0/<l5><12> 


016411 


012 


000 










016413 


136 


107 


015 


(CNTLG: 


.ASCIZ 


/♦G/<15><12> 


016416 


012 


000 










016420 


015 


012 


123 


tHSUR: 


.ASCIZ 


<15><12»/SUR 


016423 


127 


122 


040 








016426 


075 


040 


000 








016431 


040 


040 


116 


tnNEU: 


.ASCIZ 


/ NEW - / 


016434 


105 


127 


040 








016437 


075 


040 


000 









J I RE SERVE 8 BtTES FOR TTr INPU' 
n CONTROL "U- 

itCONTROL "G' 



SBTTL POWER OOUN AND UP ROUTINES 



016442 
016450 
016456 
016460 
016462 
016464 
016466 
016470 
016472 
016476 
016502 
016510 
016512 



012737 
012737 
01C046 
010146 
010246 
010346 
010446 
010546 
017746 
010637 
012737 
000000 
000776 



016606 
000340 



000024 
000026 



t POWER 
tPWRON: 



DOWN ROUTINE 



162442 
016612 
016514 



000024 



MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

HALT 

BR 



«(ILLUP.8«PWRVEC iiSET 
*340.8«PWRVEC*2 iiPRIO: 
RO.-CSP) uPUSM 
Rl.-(SP) ;iPUSM 
R2.-(SP) ssPUSH 
R3.-(SP) uPUSH 
R4.-(SP) i;PUSH 
R5.-(SP) jjPUSH 
8SWR.-(SP) jjPUSH 
SP.ISAVR6 It SAVE 

••PWRUP.84PWRVEC isSET 



FOR FAST UP 
7 

RO ON STACK 
Rl ON STACK 
R2 ON STACK 
RS ON STACK 
R4 ON STACK 
RS ON STACK 
8SWR ON STACK 
SP 

UP VECTOR 



itHANG UP 



{POWER 



016514 


012737 


016606 


000024 


•PWRUP: 


MOV 


016522 


013706 


016612 






MOV 


016526 


005037 


016612 






CLR 


016532 


005237 


016612 




11: 


INC 


016536 


001375 








BNE 


016540 


012677 


162374 






MOV 


016544 


012605 








MOV 


016546 


012604 








MOV 


016550 


012603 








MOV 


016552 


012602 








MOV 


016554 


012601 








MOV 


016556 


012600 








MOV 


016560 


012737 


016442 


000024 




MOV 


016566 


012737 


000340 


000026 




MOV 


016574 


104401 








TYPE 


016576 


016614 






IPURMG: 


.WORD 


016600 


012716 








MOV 


016602 


002034 






IPWRAD: 


.WORD 


016604 


000002 








RTI 


016606 


000000 






IILLUP: 


HALT 


016610 


000776 








BR 


016612 


000000 






tSAVR6: 


0 


2182 016614 


015 


012 


122 


PWRMSG: 


.ASCIZ 


016617 


105 


123 


124 






016622 


101 


122 


124 






016625 


105 


104 


040 






016630 


106 


122 


117 






016633 


115 


040 


120 







UP ROUTINE 

«IILLUP«8#PURVEC 
ISAVR6.SP 
ISAVR6 
ISAVR6 
II 

(SP)^.SSUR 
(SP)».R5 
(SP)».R4 
(SP)*.R3 
(SP)*.R2 
(SP)».Rl 
(SP)**RO 

*$PURDN.8#PURVEC 
#340.MPURVEC»2 

PURMSG 
(PC)*,(SP) 
STARTl 



1 1 SET FOR FAST DOWN 
iGET SP 

;WAIT LOOP FOR THE TTY 
I WAIT FOR THE INC 
tOF WORD 

tPOP STACK INTO fiSWR 

;POP STACK INTO R5 

{POP STACK INTO R4 

tPOP STACK INTO R3 

tPOP STACK INTO R2 

,POP STACK INTO Rl 

I POP STACK INTO RO 

ttSET UP THE POWER DOWN VECTOR 

|PRI0:7 

{REPORT THE POWER FAILURE 
{POWER FAIL MESSAGE POINTER 
iRESTART AT STARTl 
iRESTART ADDRESS 



I THE POWER UP SEQUENCE WAS STARTED 
.-2 tt BEFORE THE POWER DOWN WAS COMPLETE 

$PUT THE SP HERE 
ASCIZ <15><12>/RESTARTE0 FROM PWR FAIL/ 



CVDBCC OOVllJ CIAl, TS1 PR! I 
POUIR DOWN AND UP ROUTINE'. 
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2185 
2164 



016656 
016641 
016644 



2165 
2166 
2167 
2166 
2169 



016646 
016650 
016654 
016656 
016660 
016662 
016666 

016670 
016672 
016700 



016702 
016704 
016706 
016710 
016712 
016714 
016716 
016720 
016722 
016724 



2190 



127 
106 
114 



122 
101 
000 



010046 

016600 000002 
005740 
111000 
006300 

016000 016702 
00C200 

011646 

016666 000004 
000002 



016670 
013574 
01442? 
014376 
014436 
014624 
015726 
015656 
016140 
016270 



040 
111 



000002 



016726 


015 


012 


103 


016731 


126 


104 


122 


016734 


103 


103 


040 


016737 


104 


122 


126 


016742 


061 


061 


112 


016745 


040 


104 


111 


016750 


101 


107 


040 


016753 


124 


105 


123 


016756 


124 


040 


120 


016761 


101 


122 


124 


016764 


040 


061 


040 


016767 


040 


015 


012 


016772 


000 






016773 


015 


012 


104 


016776 


122 


126 


061 


017001 


061 


112 


040 


017004 


103 


101 


102 



EVEN 
SBTTL 



TRAP DECODER 



♦THIS ROUTINE WILL PICKUP THE LOWER BYTE Of THE "TRAP" INSTRUCTION 
♦AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
♦OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WILL 
♦GO TO THAT ROUTINE. 
ITRAP: MOV RO. (SP) ;sSAVE RO 

;iGET TRAP ADDRESS 
jjBACKUP Bt 2 
;iGET RIGHT BYTE Of TRAP 
SjPOSITION FOR INDEXING 
SI INDEX rO TABLE 
jsGO TO ROUTINE 



MOV 

MOV 

TST 

MOVB 

ASL 

MOV 

RTS 



RO. (SP) 
2(SP),R0 

(RO) 
(RO),RO 
RO 

$TRPAD(RO).RO 
RO 



5; THIS IS USE TO HANDLE THE "GETPRI ' MACRO 



$TRAP2: 



(SP).-(SP) 
4(SP).2(SP) 



.SBTTL 



s ;MOVE THE PC DOWN 
; J MOVE THE PSW DOWN 
J ; RESTORE THE PSW 



MOV 
MOV 
RTI 

TRAP TABLE 

♦THIS TABLE CONTAINS THE STARTING ADDRESSES OF 
♦BY THE "TRAP" INSTRUCTION. 
ROUTINE 



ITRPAD: 



.WORD 

ITYPE 

ITYPOC 

$ TYPOS 

ITYPON 

ITYPDS 

IGTSWR 

ICKSWR 

IRDCHR 

IRDLIN 



$TRAP2 

J iCALL-TYPE 

I iCALL-TYPOC 

I I CALL -TYPOS 

iiCALL-TYPON 

ijCALL-TYPDS 

ttCALL-GTSWR 

ttCALL-CKSWR 

tsCALL-RDCHR 

;tCALL-RDLIN 



TRAP ♦1(104401) 
TRAP* 2(104402) 
TRAP^3( 104403) 
TRAP ♦4( 104404) 
TRAP*5( 104405) 
TRAP ♦6( 104406) 
TRAP ♦7(104407) 
TRAPaO( 104410) 
TRAPaK 104411) 



THE ROUTINES CALLED 



TTY TYPEOUT ROUTINE 

TYPE OCTAL NUMBER (WITH LEADING ZEROS) 

TYPE OCTAL NUMBER (NO LEADING ZEROS) 

TYPE OCTAL NUMBER (AS PER LAST CALL) 

TYPE DECIMAL NUMBER (WITH SIGN) 

GET SOFT-SWR SETTING 

TEST FOR CHANGE IN SOFT-SWR 

TTY TYPEIN CHARACTER ROUTINE 

TTY TYPEIN STRING ROUTINE 



.SBTTL ASCII MESSAGES 

;;GPA TITLED: .ASCIZ < 15><12>/CVDRCA DRVllJ DIAG TEST PART 1 /<15><12> 
;iJRS TITLED: .ASCI2 <15><12>/CVDRCB ORVllJ DIAG TEST PART 1 /<15><12> ; ;GPA 
TITLED: .ASCIZ <15>< 12>/CVDRCC ORVllJ DIAG TEST PART 1 /<15><12> ;;JRS 



TLCABL: .ASCIZ <15><12>/DRV11J CABLE REQ'D/*15><12> 



CVORCC ORVllJ DIAf; T$1 PRTl 
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SCO OOhi 



ASCII MESSAGES 








017007 


114 


105 


040 


017012 


122 


105 


121 


017015 


047 


104 


015 


017020 


012 


000 




2191 








2192 017022 


122 


105 


107 


017025 


040 


124 


111 


0^7030 


115 


105 


117 


017055 


125 


124 


040 


017056 


105 


122 


000 


2195 017041 


122 


105 


107 


017044 


040 


122 


105 


017047 


101 


104 


057 


017052 


127 


122 


111 


017055 


124 


105 


040 


017060 


105 


122 


000 


2194 017065 


111 


122 


122 


017066 


040 


122 


105 


017071 


107 


040 


105 


017074 


122 


000 




2195 017076 


101 


103 


122 


017101 


040 


122 


105 


017104 


107 


040 


105 


017107 


122 


000 




2196 017111 


111 


115 


122 


017114 


040 


122 


105 


017117 


107 


040 


105 


017122 


122 


000 




2197 017124 


111 


123 


122 


017127 


040 


122 


105 


017152 


107 


040 


105 


017155 


122 


000 




2196 017137 


105 


110 


111 


017142 


120 


040 


123 


017145 


124 


101 


124 


017150 


040 


105 


122 


017153 


000 






2199 017154 


105 


122 


122 


017157 


120 


103 


040 


017162 


040 


040 


124 


017165 


125 


124 


116 


017170 


125 


115 


040 


017173 


040 


102 


125 


017176 


123 


101 


104 


017201 


122 


040 


040 


017204 


105 


130 


120 


017207 


103 


124 


040 


017212 


040 


040 


122 


017215 


103 


126 


104 


017220 


000 






2200 017221 


105 


122 


122 


017224 


120 


103 


040 


017227 


040 


040 


124 


017232 


123 


124 


116 


017235 


125 


115 


040 


017340 


040 


102 


125 


017245 


123 


101 


104 



EMI: 



EM2: 



EM3: 



Em: 



EM5: 



EM6: 



EM7: 



OHl: 



0H2: 



.ASCIZ /REG TIMEOUT ER/ 



.ASCIZ 'REG REAO/URITE ER' 



.ASCIZ /IRR REG ER/ 



.ASCIZ /ACR REG ER/ 



.ASCIZ /IMR REG ER/ 



.ASCIZ /ISR REG ER/ 



.ASCIZ /CHIP STAT ER/ 



.ASCIZ /ERRPC TSTNUM 8USA0R EXPCT RCVO/ 



.ASCIZ /ERRPC TSTNUM BUSAOR AORS EXPCT RCVO/ 



ASCI! MESSAGES 











Ul r 


lol 














01 7257 


040 


040 


105 


0172«? 


130 


120 


tos 


017P65 


124 


040 


040 


017270 


040 


122 


103 


017273 


126 


104 


000 



^201 
2202 

2203 017276 
017304 

2204 017312 
017320 
017326 



001116 
001124 
001116 
001120 
000000 



001S62 
001126 
001S62 
001124 



001122 OTl: 
000000 
001122 0T2: 
001126 
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.EVEN 

tERRPC . TbTN'JM. tBOAOR. tGOOAT . tSOOAT .0 
tEMPC . TSTNUn. tBOAOA. tC-^AQR . tGOOAT . tBOOAT .0 
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FALCON (K>T II'* L»Po«AOt or.TlNts. ;|L*PA 



I 



206 

2209 
2210 
2211 
^212 
2215 
2214 
i^215 
2216 
2217 
2216 
2219 
2220 
2221 
2222 
2221 
2224 
2225 
22» 
2221 
222B 
2229 
2230 
2231 
2232 
2233 
2234 
2235 
2236 
2237 
22 S6 
2239 
2240 
2241 
2242 
2243 
2244 
2245 
2246 
2247 
2248 
2249 
2250 
2251 
2252 
2253 
2254 
2255 
22S6 
2257 
2256 
2259 
2260 



.SBTTL TAlCON (KXT 11) UPGRAOe ROUTIMES. 



llGP4 



017330 
017334 
017336 
017342 
017344 
017346 



000400 
000404 
000410 
000416 
000422 
000424 
000426 
000432 
000434 
000440 
000444 
000450 
000454 
000460 
000464 
000470 
000476 
000502 

000504 
000510 
000512 
000516 
000522 
000526 
000530 
000534 
000536 
000542 
000544 



005227 
001002 
004737 
005727 
000000 
000207 

017350 
000400 
005037 
013746 
012737 
012700 
005720 
000240 
020027 
103773 
010037 
012700 
040037 
040037 
040037 
040037 
040037 
012737 
012637 
000207 

012716 
000002 
012637 
012700 
015701 
010602 
012704 
014446 
020427 
101374 
010607 



THE rOLLOUiNG ROUTINES HAVE BEEN AQOED TO ALLOW OlAGNOSTICCS) 
TO RUN ON A FALCON (KXT 11) BASED StSTEH. 

TO OETENHINE UHETHER mere a FALCON OR NOT. UELL SIZE T»C IST 3/4 V 
THE I/O PAGE (26K TO 51K). FALCON HAS 2KU LOCAL RAH AT 26K(*4} TO SO*' 
AND A HACRO ODT AT 50K TO 31K. CONSEQUENTLY. ALL I/O DEVICES HUST 
BE PLACED BETUEEN 174000 AND 1777 76. AODITIGNALLT . IC'LL STMAP THE 
EHT AND TRAP SERVICE LEVEL TO PRI6. AND SET THE HALT VECTOR SO THAT 
WE CAN STOP THE SUCKER !! 

TO HINIHIZE THE IHPACT OT THESE CHANGES ON FINAL PROGRAM SITE. T»€ 
BULK OF THIS CODE IS PLACED IN THE FLOATING VECTOR SPACE (400-776). 
IF THE CPU AT HAND IS A FALCON (KXTll). IT STATS THERE (NO HARH DONE). 
OTHERWISE. THE AREA IS RESTORED TO ITS ORIGINAL TRAP CATC»€R' STATk. 



177777 
000400 



FALCON: INC •-I 

BNE 11 

CALL KXTCHK 

II: TST (PC)» 

KXTFLAG: 0 

RETURN 



017344 
000004 

000504 000004 
160010 



174000 

017344 
000040 
000006 
000016 
000022 
000032 
000036 

170000 000140 
000004 



000512 

000004 
000402 
000376 

000570 

000546 



2t: 
5t: 

4$: 



NOV 
RTI 
NOV 
NOV 
NOV 
HOV 
HOV 
HOV 
CHP 
BHI 

nov 



t5$.(SP) 

(SP)*.aM 

«402.R0 

M576.R1 

SP.R2 

«6I.R4 

-(R4)..(SP) 

R4.#5» 

4* 

SP.PC 



ONCE -ONLY !•! 

EXECUTE FALCON CHECK 
TEST FALCON FLAG. . . 

...HZ ' FALCON... 

...AND RETURN TO CALLER. 



JiGPA 
iiGPA 
i;GPA 
iiGPA 
liGPA 
itGPA 





ISVPC- 


• 




iiGPA 




.- 400 




; RESTORE FROM 574:^76 AT END 


jiGPA 


KXTCHK: 


CLR 


KXTFLAG 


t ASSUME NOT FALCON. 


iiGPA 




NOV 


M4.-(SP) 


i SAVE ERROR VECTOR. 


mGPA 




NOV 


«2<.0M 


i SET A TRAP CATCrCR. 


ssGPA 




NOV 


♦160010.ro 


t FALCON RAH STARTS AT 26K«4. 


;iGPA 


1<: 


TST 


(RO)* 




;iGPA 




240 






nGPA 




CHP 


R0.«1 74000 


t SIZE TO 31K. 


jiGPA 




BLO 


It 




jiGPA 




nov 


RO. KXTFLAG 


; MUST BC FALCON. SET THE FLAG 


iiGPA 




HOV 


♦40.R0 


t GET PRIl BIT... 


iiGPA 




BIC 


RO.0*6 


I...AND LOWER BUS-ERROR... 


iiGPA 




BIC 


R0.M16 


1 • • • 0P T » , , 


.iGPA 




BIC 


R0.8*22 


1 . . • lOT • • . 


;jGPA 




BIC 


R0.9*32 




JiGPA 




BIC 


R0.9*36 


i!.'!anD TRAP SERVICE TO PRI6 


jiGPA 




HOV 


#170000. a«140 


1 ENABLE "BREAK- HALT. 


uGPA 




HOV 


(SP)*.S*4 


i RESTORE ERROR VECTOR... 


jjGPA 




RETURN 




I...ANO RETURN. 


jjGPA 



TRAP NOT A FALCON. . . 
, . .CONTINUE. 

RESET ERROR VECTOR 

SET-UP TO RESTORE FLOATING. 
...VECTORS (400 - 776). 

SAVE STACK POINTER IN R2 

PUSH T»C RESTORE CODE... 
...ONTO THE STACK. 

AND EXECUTE IT. 



uGPA 
iiGPA 
nGPA 
iiGPA 
ilCPA 
liGPA 

siGPA 
uGfr'A 
iiGPA 
uGPA 



cvoBCC wvu ' c:*i, Ts» p«fi MACRO m?oo 

TALCON (KXT II) «.PGRAOe «r.'TINtb. 



22h^ 
2265 
2264 

2265 000546 

2266 000552 
226 T 000554 
2266 000556 

2269 000562 

2270 000564 

2271 000566 

2272 000570 
2275 

2274 
2275 
2276 
2277 
2270 
2282 
2265 
2264 
2265 



010060 
010110 
022020 
020027 
101771 
010206 
000207 



00C104 

017550 
017550 
000001 



177776 



000" 76 



OfC 65 09:5S PAGt 16 
!;GPA 



t 

5t: 



THIS CODE IS RELOCATED TO AND EyECUTEO IN THE STACK AREA. 



6« 

s 
> 



MOV 

nov 

CUP 

CHP 

BLOS 

MOV 

RETURN 



RO. 2(R0) 

Rl.(RO) 

(RO)..(RO). 

RO.#776 

5» 

R2.SP 



I RESTORE .♦2... 
;...HALT (OR lOT). 



J LOOP 'TIL DONE 

; THEN RESTORE SP. . . 

(...AND RETURN TQ CALlER 



IF FALCON. THIS AREA IS FREE FQR ANY PROGRAM UNIQUE 
i CHANGES OR DATA STRUCTURES. 
t IF USED. TOU'O BETTER PROTECT IT ! ! ! 



♦FREE- 



LASTAO- 



<1000 .>/2 
.•»SVPC 

!eno 



FREE UQROS LEFT. 



ti^PA 
it'^'PA 
tiVA 
liGPA 
tiGPA 
tiGPA 
ttGPA 
itGPA 



»»GPA 

»;GPA 
liGPA 
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TABLE 


















A8ASE • 


164160 


BGPATl 


0 1 32 ^4 


OSUR • 


177570 


D WM A m 


AAA VAA 


TC T 1 1 

• b • 11 


AAXA OO 

00342< 


•^COWl ■ 


000000 


8IT0 


OOOOOl 


DTI 


017276 




A 1 1 A 

0100l4 


TC T 1 O 

1 b 1 Ic 


AA 1 A. 

003516 




000000 


8IT00 • 


/\AAAA 4 

OOOOOl 


0T2 


017312 


KWHVtU • 


A^^\/>OA 

UUUUcA 


TC T 1 * 

1 b 1 13 


00361c 


ACPUOP" 


000000 


BITOl ■ 


000002 


EOCMPl 


013314 




1 AA A « A 


TC r 1 A 
1 5T 14 


AA < 7AA. 
OO^ f 06 




001400 


BIT02 • 


0000O4 


EDCHP2 


013352 


AA| Tkl • 


1 AAA 1 1 


T c r 1 
1 b I lb 


AAA AC^ 

004056 


AOOWO * 


oooooo 


6IT05 • 


000010 


EDCHP3 


013414 




lOOOOO 


T C T 1 ^ 

1 b 1 16 


AAA ^OA 

004224 


AOOW I • 


oooooo 


A T T^A . 

8IT04 • 


000020 


E0CHP4 


013456 


HtbVtL ■ 




TCT1 7 


AAA C OA 

004bc4 


AOOW 10" 


oooooo 


BIT05 • 


000040 


EMTVEC- 


000030 


Ho ■ 


^AAAAAX. 


TCT O 

1 b 1 2 


AAOOOA 

OOcccO 


AOOW I 1 « 


oooooo 


61 T06 • 


AAA4 AA 
OOOlOO 


EWl 


017022 


M f ■ 


^ AAAAA f 


TCTOn 

1 b 1 cO 


nn<y\i o 
OObOlc 


A00W12* 


oooooo 


BIT07 • 


AAA'^AA 

000200 


EH2 


017041 


bLU^c • 


AAAAA A 


TC T 01 

1 b 1 cl 


nn^Ti o 


ADuU15" 


oooooo 


dITOo • 


AAAA AA 


EM3 


017063 


ctmd ■ 




TCT^O 

1 b 1 CC 


nn^A^w^ 
UUDOUU 


A00UI4 • 


oooooo 


BIT09 ■ 


AA4 AAA 
OOlOOO 


Eri4 


017076 


C TDD ■ 




TCI ox 

1 b 1 CO 


nn^7 XA 


A00W15- 


oooooo 


A T T « 

Bill • 


AAAAA^ 

000002 


EH5 


017111 


CC TMD ■ 




TCTOA 

1 b 1 c4 


nn^ 1 AA 
OOD14A 


A00U2 • 


oooooo 


A T T « ^ _ 

BITIO ■ 


AAOAAA 

002000 


EH6 


017124 


CCTOD ■ 

bblNH ■ 


AAA1 TA 

000130 


TCTO^ 

I b 1 cD 


AAJL XCA 

OOo3bO 


A00U5 • 


oooooo 


A T T « « - 

BIHl ■ 


AAA AAA 

004000 


EM7 


017137 


CTAPV ■ 

biAL^x ■ 


nni 1 nn 


TCTOA 

1 b 1 CO 


AA^gCA 

WOD^ 


A00W4 • 


oooooo 


O T T 4 ^ « 

BIT12 ■ 


Af ^^^^ 

OlOOOO 


ENDDAT 


013572 


CTADT 


nni AnD 


TCT>7 

1 b 1 c » 


UUOO f c 


A00W5 • 


oooooo 


o r T 4 V « 
BIT13 • 


A'^AAAA 

020000 


ENDPAT 


013500 


C T AD T 1 
b 1 MH 1 1 


nnonTA 


TCT X 

1 b 1 3 


nnoA 1 o 


AOOUd ■ 


oooooo 


A T T 4 A - 

BIT14 ■ 


AA AA^^^ 

040000 


ERROR - 


104000 


CTVI MT ■ 


1 77 77A 


TCTXA 


nn7ni n 


ADOW7 • 


oooooo 


O TT ^ C • 


« AAAAA 

lOOOOO 


ERRVEC- 


000004 




nni 1 An 


TCT XI 


VA/ f lUc 


A00U6 ■ 


oooooo 


O TT*^ a 

BIT2 • 


AAAAAA 

000004 


FALCON 


017330 


bWKL's 


ni ^ooA 


1 b 1 dc 


nn7ono 
uu r cUc 


A00W9 • 


oooooo 


A T T V _ 

BIT3 • 


AAAA4 A 

000010 


GTSUR - 


104406 


bvPfclj 


nnni 7 a 
OOOl rO 


TCT H 

» b 1 33 


nn7xxn 
vO f 33U 


ADEVCT ■ 


oooooo 


A T T A • 

BIT4 • 


AAAA^A 

000020 


MT 


000011 


bHO ■ 


1 UiAAlOl 


TCT YA 

1 b I 3# 


nn7Ai%A 


Aotvn « 


OOOOOl 


O T TC . 

BITS • 


AAAAA A 

000040 


IE 


001000 


CUAA ■ 


1 nnnnni 


TCTX^ 
1 b 1 


UU f DDo 


Af fcn J 

«cNV ■ 


OOOOOO 


O T T^ m 

BIT6 • 


AAA i AA 

OOOlOO 


IMRLOC 


001372 


cuni a 
bWUi * 


1 nAA/v>9 


TCTXA 

1 b 1 do 


W f OOV 


McNVH ■ 


oooooo 


A T T ^ 

BIT7 ■ 


AAA'^AA 

000200 


INTFLG 


001366 


cuno a 
bWOc " 


AAAAAA 

■ U\Aaa/4 


TCT T7 

1 b 1 3 r 


A* AA* o 


AC A T Ai - 


oooooo 


A IT TO B 

BITB ■ 


AAAA AA 

000400 


lOTvEC- 


000020 


cunT 
bHv3 ' 


■ fsi's/sfw n 
' V/UUUlU 


TCTA 


UUc>cc 


AMAnOf _ 

AnMONI ■ 


oooooo 


A T T A — 

BITS ■ 


AA« AAA 

001000 


IRRLOC 


001376 


CUAA • 

bWU4 ■ 


, AAAA OA 


TCTAn 
1 b l4U 


ni ni AA 




oooooo 


BPTVcC* 


AAAA4 A 

000014 


ISRLOC 


001374 


gj AAg 

bWOD 


■ AAAAAA 


TCTA 1 
1 b 1 *1 


ni no7n 


AMAr\0 V . 


oooooo 


CMPISR" 


AAA« AA 

000140 


KXTCHK 


000400 


<*l «AX 

bWOb 


■ nnni nn 

■ OOOlOO 


TCTAO 
T b 1 4if 


ni AAAA 




oooooo 


ClfW ■ 


AAAAA A 

000040 


KXTFLA 


017344 


bHO f ■ 


■ UOU£\A/ 


TCTAX 
1 b 1 ^3 


m ^wi^o 

UlUoDc 




oooooo 


CIRnR • 


AAAA OA 

000020 


LASTAO- 


017350 


bWOO 


■ nnnAnn 


TCTAA 


ni 1 1 7o 
Ulll fc 


AMAMC ^ a 


oooooo 


CIRR • 


AAA4 AA 

OOOlOO 


LF 


000012 




■ nni nnn 


TCTA^ 


A* « C/W\ 


AMAMC V ■ 


oooooo 


CISR ■ 


AAA* ^A 

000160 


LMD04 - 


000200 


bWl 


■ UUiAAl^ 


TCTAA> 

1 b 1 #o 


ni onxn 


AMAMCA a 


oooooo 


CKblm ■ 


% AA A A7 

10440 r 


LM057 • 


000240 




■ tfV^9/W> 

■ UUcUW 


TCTA7 
1 b 1 * * 


Al OXXA 


AMC^ An ■ 


oooooo 


CLRCSR 


A 4 V 4 X. A 

013164 


nACR - 


000254 


bWll 


■ nnAnnn 


TCT*w 
1 b 1 D 


/v\oA,on 

VA/COCV 




AAAA/\A 

oooooo 


CLRIRH 


A « VO V A 

013254 


mm - 


000244 


cui ^ 1 
bW12 * 


■ ni nnnn 


TCTitn 

1 b 1 DO 






oooooo 


CR ■ 


AAAA* C 

OOOOlD 


HIRR • 


000250 


Cui X 
bW13 ' 




TCTC1 

1 bidl 


ni *^ * ^ 


AMT VDt • 


oooooo 


#»Aj C _ 

CRLr • 


AAAOAA 

000200 


HISR • 


000240 


CUI A 

bM14 


■ nAAA/V% 


TCTA. 
1 b 1 D 


UUc f OO 


AMT VD^a 


oooooo 


CSIfW ■ 


AAAACA 

OOOOdO 


NEXPAS 


002100 


CUI c 

bWlD 


■ 1 f\^\/\f^ 

■ lOOOOO 


TCT7 
1 b 1 f 


nnxi An 


AMT VD V ■ 


oooooo 


CblRMR* 


AAAAVA 

000030 


NEXPAl 


002104 


CU9 t 

bWc 


■ UUU\IU4 


TvDnc A 


1 AA A AC 


AMT vDA a 


oooooo 


CSXRR • 


AAA« V A 

000110 


NXDEV 


013002 


CUT 

5U3 


k nnnni n 


T VDC * 


1 AA A A* 

1U4#U1 


ADACC m 


oooooo 


CSISR ■ 


AAA* "T/N 

000170 


NXDEVl 


013006 


CUA 


■ nn/v\on 




1 AA A AO 




oooooo 


OOISP • 


1 77570 


PACR • 


000300 


cue 


AAAAAA 

■ OUUU4U 




1 AAAAA 




000040 


DMl 


A« ^4 CA 

017154 


PATDAT 


013502 


CUA. 


■ nnni nn 




1 AAAAX 




OOOOOl 


0M2 


017221 


Pim - 


000260 


CU7 
bM r 






AA1 X7A 


ADTCT7« 
AK 1 blZ* 


oooooo 


ATA _ 

DIR ■ 


AAAA AA 

000400 


PIRQ « 


177772 


CUA 

bWO 


■ nnnAnn 

■ UUU4UU 


t ADTfctf^ 


AA* nnn 




OOOlOO 


nTcm A 
DISPLA 


AA 4 4 A 

001142 


PIRQVE- 


000240 


CUD 

bIW 


» nni nnn 


t AT VP 


Al A 1 Ca 




oooooo 


DISPRc 


AAA* ^A 

000174 


PRO 


OOOOOO 


TDTTuC J 


■ nnnni A 

■ \AA/U14 




Al Al XA 


A TC C Tkt. 


oooooo 


unAP 


AA* "W^ A 

001364 


PRl 


000040 


TTTi cn 


ni A.70A 


ft AT YX 


Al Al XA 


Al ^T T « 


oooooo 




AA * V A O 

001342 


PR2 


OOOlOO 


1 InVcL 


■ WUUOU 


ft ATVA 


A 1 A 1 A A 


Al ICI^A * 


oooooo 


AB^f B 

DRCSB 


AA* V A ^ 

001346 


PR3 


000140 


Tl ^AOl 


ni A77T 
UlO f r 3 


ft Al ITOP 


AA1 1 XA 


AVcCTl" 


oooooo 


DRCSC 


AA* 

001352 


PR4 


000200 




■ nnnnAA 




AA1 9AA 




oooooo 


DRCbO 


AA* VC^ 

001356 


PR5 


000240 


TDADiiC 






AA1 1 




013272 


ADI\fi A 

DRuBA 


AA4 TAA 

001344 


PR6 


000300 


TOTUCP 
1 fi 1 VtL 






AA1 1 










PR7 


000340 


TSTNUH 


001362 


iCDUl 


001250 


BGCHP3 


013374 


OROBC 


001354 


PS 


177776 


TSTl 


002142 


SCHARC 


014124 


BGCHP4 


015436 


OROBO 


001360 


PSW 


177776 


TSTIO 


003326 


SCKSUR 


015656 



CvORCC 
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A(, TSI 
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HACRO 1 


bTMBOL 


TABLE 








ICHTAG 


001100 




lESCAP 


001162 


«CM5 ' 


• 000000 




tETABL 


001210 


fCNTLG 


016413 




tETEND 


001252 


ICNTLU 


016406 




•FATAL 


001172 


tCPUOP 


001216 




•FFLG 


014374 


$C«LF 


001165 




•FILLC 


001156 


lOBLK 


015040 




•FILLS 


001155 


lOEvCT 


001200 




•FREE - 


000104 


»OEVH 


001246 




•GDADR 


001120 


»OOAGN 


01S140 




•GDDAT 


001124 


»OTBL 


0150S0 




•GET42 


013120 


»ENDAO 


OlSlSO 




•GTSUR 


015726 


lENOCT 


013076 




•HO 


000003 


tENONG 


013147 




•HIBTS 


001000 


tENULL 


013144 




• ICNT 


001104 


tENV 


001210 




•ILLUP 


016606 


»ENvn 


001211 




• INTAG 


001135 


•EOP 


013042 




•ITEMB 


001114 


•EOPCT 


013070 




•LF 


001166 


lERFLG 


001103 




•LFLG 


014373 


lERTMX 


001115 




•LPAOR 


001106 


•ERROR 


015050 




•LPERR 


001110 


lERRPC 


001116 




•MAORI 


001222 


lERRTB 


001252 




•riA0R2 


001226 












lERTTL 


001112 




iMA0R4 


001236 


. ABS. 


017350 


000 








000000 


001 






ERRORS 


DETECTED; 


0 
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•HAIL 
•MAHSl 
•MAnS2 
•MAnSi 

•riAriS4 
tmiw 

•MFLG 

•HNEU 

•nSGAO 

•nSGLG 

•MSGTY 

•MSUR 

•MTYPl 

•MTYP2 

•MTYP3 

•HTYPA 

•MXCNT 

•NULL 

•NUTST* 

•OCNT 

•OMOOE 

•OVER 

•PASS 

•PASTn 

•PURAO 



001170 
001220 
001224 
001230 
001234 
001002 
014372 
016431 
001204 
001206 
001170 
016420 
001221 
001225 
001231 
001235 
015654 
001154 
000001 
014620 
014622 
015640 
001176 
001006 
016602 
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•PWRDN 016442 
•PURHG 016576 
•PWRUP 016514 
•QUES 001164 
•RDCHR 016140 
•RDLIN 016270 
•RDSZ ■ 000010 
•RTNAO 013142 
•SAVR6 016612 
•SCOPE 015576 

• SETUP- '»AOll7 
•STUP • 17//77 
•SVLAO 015604 
•SVPC • 017350 
•SWR - 165400 
•SWREG 001212 
•SWRMK- 000000 
•TESTN 001174 
•TIMES 001160 
•TKB 001146 
•TKS 001144 

• TN - 000052 
•TPB 001152 
•TPFLG 001157 
•TPS 001150 



•TRAP 016646 
•TRAP2 016670 
•TRP • 000012 
•TRPAO 016702 
•TSTM 001004 
•TSTM1 001102 
•TTYIN 016376 
•TYPDS 014624 
•TYPE 013574 
•TYPEC 014006 
•TYPEX 014126 
•TtPOC 014422 
•TYPON 014436 
•TYPOS 014376 
•UNIT 001202 
•UNITH 001010 
•USUR 001214 
•VECTl 001240 
•VECT2 001242 
•XOFF - 000023 
•XON - 000021 
•XTSTR 015410 
••GET4- 000000 
•OFILL 014621 
.•X « 001000 



CVD«CC 


CUFATtO 


MACRO ON 2: 


DEC 85 ^ 




CROSS RtrERENCE 






SYMBOL 


VALUE 


REFERENCES 




ABASE 


- 164160 


M-424 


10-473 






11-527 


11-528 


ACDUI 


• 000000 


10-473 


10-473 


ACDU2 


• 000000 


10-473 




ACPliOP 


• 000000 


10-473 


10-473 


ACRLOC 


001400 


♦11-540 




AOOUO 


■ 000000 


10-473 




ADOWl 


• 000000 


10-473 




AOOUlO 


• 000000 


10-473 




AOOUII 


■ 000000 


10 473 




A00W12 


■ 000000 


10-473 




A00UI3 


• 000000 


10-473 




A00UI4 


« 000000 


10-473 




AOOUIS 


• 000000 


10-473 




A00U2 


• 000000 


10-473 




A00U3 


AM AAA A 

• 000000 


10-473 




A00W4 


• 000000 


10-473 




A00W5 


■ 000000 


10-473 




AD0W6 


■ 000000 


10-473 




A00W7 


• 000000 


10-473 




A00U6 


• 000000 


10-473 




A00W9 


• 000000 


10-473 




AOEVCT 


• 000000 


10-473 


10-473 


AOEVM 


• 000001 


M-425 


10-473 


AENV 


• 000000 


10-473 


10-473 


AENVM 


■ 000000 


10-473 


10-473 


ArATAL 


■ 000000 


10-473 


10-473 


AHAOPl 


• 000000 


10-473 


10-473 


AMA0R2 


• 000000 


10-473 


10-473 


AhAOAB 


• 000000 


10-473 


10-473 


A*1A0R4 


• 000000 


10-473 


10-473 


AflAHSl 


m 000000 


10-473 


10-473 


AMAMS2 


• 000000 


10-473 


10-473 


AMAf1S3 


• 000000 


10-473 


10-473 


AMAMS4 


• 000000 


10-473 


10-473 


AHSGAO 


• 000000 


10-473 


10-473 


AMSGLG 


■ 000000 


10-473 


10-473 


AnSGTY 


• 000000 


10-473 


10-473 


AnTYPl 


• 000000 


10-473 


10-473 


AMTYP2 


- 000000 


10-473 


10-473 


AMTYP3 


■ 000000 


10-473 


10-473 


AMTYP4 


• 000000 


10-473 


10-473 


APASS 


■ 000000 


10-473 


10-473 


APRIOR 


- 000000 


10-473 




APTCSU 


■ 000040 


17-2165 


♦17-2166 


APTENV 


> 000001 


17-2165 


17-2166 


APTSIZ 


■ 000200 


12-544 


♦17-2166 


APTSPO 


• 000100 


17-2165 


17-2166 


ASUREG 


A A A A..A A 

• 000000 


10-473 


10-473 


ATESTN 


A^.A.AA A 

• 000000 


10-473 


10-473 


AUNIT 


• 000000 


10-473 


10-473 




' UUOUUv 


10-475 





10-47S 
12-555 
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11 522 



11-523 



11524 



ll-5?5 



11 526 



10-473 



#17-2166 
♦17-2166 



17-2169 
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3THB0L CROSS RifCRENCE 
StMBOL value 



AVECTl 
AVECT2 
BEGPAT 

BCCHPS 
BGCHP4 
BGPATl 
BZTO 



. 000000 
• 000000 
015272 

015334 
013374 
013436 
013274 
> 000001 



BITOO 


- 000001 


BITOl 


• 000002 


BIT02 


• 000004 


BIT03 


• 000010 


ox IU4 


■ OUUOcO 


D T T AC 


• 000040 




_ AAA1 AA 

■ OOOIOO 




m AAA^AA 


0i 1 vO 


■ 000400 


BIT09 


• 001000 


Bin 


- 000002 


nr T m 




AT T 1 1 


- AA^AAA 
m 00400U 


Ol 1 le 


■ A1 AAAA 


BIT13 


VCv\A/w 


BIT14 


- 040000 


Bins 


• 100000 


BIT2 


• 000004 


BIT3 


• 000010 


BIT4 


• 000020 


BITS 


• 000040 


BIT6 


• OOOIOO 


BIT7 


- 000200 


BITS 


- 000400 


B1T9 


- 001000 


BPTVEC 


• 000014 


CHPISR 


- 000140 


CIMR 


- 000040 


CIRMR 


- 000020 


CIRR 


- OOOIOO 


CISR 


• 000160 


CKSUR 


■ 104407 


CLRCSR 


013164 



REFERENCES 

10-473 
10-473 

12- 796 
15-1349 

•16-2076 

13- 1443 
13-1414 
13-1660 

•a -423 

12- 769 

13- 95S 
13-1116 
13-1933 

*6-423 
♦6-423 
«6-423 
*6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-425 
•6-425 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 
•6-423 

15-1072 
•6-425 

12-741 
•6-425 
•6-425 
•6-425 
•6-444 
•6-434 
•6-411 

15-1956 
•6-459 
•6-445 

17-2169 

12-656 

15-675 

15-1519 

15-1536 



10 473 
10-475 

12- 815 
15-1740 

13- 1543 
13-1514 

•16-2062 
12-626 

12- 766 

13- 963 
13-1141 
13-1934 
6-423 
8-423 
6-423 
6-423 
6-423 
6-423 
6-423 
6-423 
6-423 
6-423 
12-661 

17-2179 

17-2169 
17-2179 
6-426 



12-625 

12-625 
12-746 
6-427 
6-426 



13-1576 
15-1575 
15-1959 
15-1495 

17-2169 

12- 677 
15-910 
15-1344 

13- 1565 



CREF VOl 



'.Ej OC'2 





1 p 

Ic 




to 




1 s 

1 V 








13 - 


1 1A7 
i AV f 


1 % . 


1 


13 1671 


15 


1928 


•16 


2061 


















•16-2095 


























13 1599 


•16 


-2112 






















12-646 


12 


-659 


12 


-661 


12 


703 


12 


■722 


12- 


734 


12 


756 


12-601 


12 


-620 


12 


-640 


12 


-660 


13 


•661 


13- 


916 


15- 


951 


13-1006 


13 


-1010 


15 


-1035 


13 


-1056 


15 


■1062 


13- 


1090 


13- 


1112 


i3-1661 


15 


-1741 


13 


1742 


13 


-1605 


13 


-1606 


13- 


1672 


IS 


1673 


13-1966 


15 


-1967 


13 


-1968 


15 


-1969 


15 


-2046 











17-2179 
17-2169 



12-640 

12-655 
12-755 

12-661 



15-1595 
15-1664 

15-1547 

17-2169 

12- 696 
15-945 

13- 1369 
13-1592 



17-2179 



12-647 

12- 640 

13- 902 



13-1447 
15-1751 



17-2176 

12- 729 

13- 1000 
13-1566 
13-1627 



12-661 

12- 647 

13- 930 



15-1656 
15-1752 



17-2179 

12- 764 

13- 1052 
13-1406 
13-1664 



12 666 

12- 661 

13- 956 



13-1612 



•17-2164 

12- 795 

13- 1106 
15-1457 
15 1673 



12-668 

12-66S 
15-965 



15-1615 



12- 614 
15-1157 
15-1465 

13- 1754 



12-741 

12-666 
15-1065 



13-1862 



12- 634 

13- 1167 
15-1486 
15-1795 



15-956 

12-755 
15 1072 



13 1665 



12- 654 
15-1275 

13- 1507 
13-1857 
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STHBOL CPOSS REFERENCE CREF vOl 



SYMBOL VALUE REFERENCES 







13-1865 


13-1927 


15 


1965 


15 


1985 


clrirr 




13-1161 


13-1191 


15- 


1232 


13 


1279 






13-1597 


13-1633 


13 


1669 


#15 


2045 


CR 




^8-423 


17 2165 


17 


2165 






CRL^ 


m 000200 


#8-423 


17-2165 


17. 


'2165 






CSIHR 


• 000050 


#8-435 


13-1416 










CSIRMR 


• 000030 


#8-432 


13 1600 










CSIRR 


• 000110 


#8-440 


13-1516 










CSISR 


• 000170 


#8-446 












OOISP 


• 177570 


#8-423 


10-473 


12 


-544 






OH I 


017154 


11-476 


11-482 


11 


-488 


11 


-494 


DH2 


017221 


#17-2200 












OIR 


• 000400 


#8-427 


12-625 


12 


-702 


12 


-733 


DISPLA 


001142 


#10-473 


*12-544 


*12 


-544 


17 


2169 


OISPRE 


000174 


#8-462 


12-544 










OHAP 


001364 


#11-534 


*12-583 


♦ 12 


584 


12 


-587 


DRCSA 


001342 


#11-521 


*12-586 


12 


-590 


12 


-606 






13-948 


13-1005 


13 


-1056 


13 


-1159 






13-1371 


13-1390 


13 


-1411 


13 


'1440 






13-1595 


13-1667 


13 


-1674 


13 


-1678 






15-2031 


15-2046 










ORG SB 


001346 


#11-523 


12-699 


12 


-766 


12 


-817 






13-1234 


13-1277 


13 


-1323 


13 


-1348 






13-1489 


13-1511 


13 


-1540 


13 


-1568 






13-1965 


15-2032 










ORCSC 


001352 


#11-525 


12-620 


12 


-658 


12 


-750 






13-1226 


13-1270 


13 


-1313 


13 


-1339 






13-1480 


13-1502 


13 


-1531 


13 


-1560 






13-1728 


13-1858 


13 


-1986 


15-2033 




001356 


#11-527 


12-700 


12 


-765 


12-857 






13-1271 


13-1314 


13 


-1340 


13 


-1365 






13-1503 


13-1532 


13 


-1561 


13 


-1588 






13-1987 


15-2034 










DR06A 


001344 


#11-522 


12-799 


13 


-980 


13 


-1040 


DRQBB 


001350 


#11-524 


12-818 


13 


-988 


13 


-1032 


0R06C 


001354 


#11-526 


12-838 


13 


-972 


13 


-1087 


DR06D 


001360 


#11-528 


12-593 


12 


-858 


13 


-1024 


DSUR 


■ 177570 


#8-423 


10-473 


12 


-544 






OTl 


017276 


11-477 


11-483 


11 


-489 


11 


-495 


0T2 


017312 


#17-2204 












EDC^l 


013314 


13-1719 


#16-2070 










E0C^2 


013352 


#16-2085 












E0C»^3 


013414 


13-1454 


13-1554 


#16 


-2103 






EOC^A 


013456 


13-1425 


13-1525 


13 


-1616 


#16 


-2120 


EMTVEC 


• 000030 


#8-423 


♦12-544 


♦ 12 


-544 






EHl 


017022 


11-475 


#17-2192 










Em 


017041 


11-481 


#17-2193 










EhS 


017063 


11-487 


#17-2194 










Em 


017076 


11-493 


#17-2195 










EM5 


017111 


11-499 


#17-2196 










Erie 


017124 


11-505 


#17-2197 










tH7 


017137 


11-512 


#17-2198 











sea ocfi 



#15 


2030 


















15 


1469 


1^ 


1490 


13 


1512 


15 


1541 


IS- 


1569 


11 


500 


Il- 


-506 


Il- 


•513 


#17- 


2199 






12 


•768 


ls 


•958 


ls- 


1015 


13- 


•1065 


IS 


1119 


17 


-2179 


















♦ 14 


-2013 


14 


2017 














12 


•619 


12 


-657 


12 


•678 


12 


731 


12 


7<)8 


13 


-1188 


13 


•1233 


13 


-1276 


13 


•1322 


13 


1347 


13 


-1467 


13 


-1488 


13 


-1510 


13 


•1539 


13 


•1567 


13 


1682 


13 


-1860 


13 


■1930 


13 


•1964 


14 


2011 


13 


-950 


13 


-1003 


13 


-1110 


13 


•1160 


13 


•1189 


13 


-1372 


13 


-1391 


13 


-1412 


13 


-1441 


15 


-1468 


13 


-1596 


13 


-1668 


13 


-1675 


13 


•1861 


13 


-1931 


12 


-837 


13 


-949 


13 


-1055 


13 


1111 


13 


-1182 


13 


-1364 


13 


-1383 


13 


-1403 


13 


-1431 


13 


-1460 


13 


-1587 


13 


-1622 


15 


-1665 


13 


-1679 


13 


-1683 


13 


-1004 


13 


-1057 


13 


-1109 


13 


-1183 


13 


-1227 


13 


-1384 


13 


-1404 


13 


-1432 


13 


-1461 


13 


1481 


13 


-1623 


13 


-1666 


13 


-1729 


13 


-1859 


15 


-1952 


13 


-1079 


















13 


-1130 


















13 


-1146 


















IS 


-1095 


13 


-1138 














11 


-501 


11 


-507 


11 


514 


#17 


-2203 







CVOACC 



CHtATEO Bi MACRO ON 2^ DEC 85 At 0<>:S6 



3«MB0L CROSS RCfERFNCF 
•;»MBOL VALUE 
ENDDAT 015572 



ENDPAT 
ERROR 



f ALCON 
GNS 



GTSUR 

HT 

IE 

IMRLOC 
INTfLG 
lOTVEC 
IRRLOC 
ISRLGC 
KXTCHK 
KXTFLA 
LAS TAD 
LF 

LM004 

LM057 

riACR 

MIMP 

MIRR 



HISR 

NEXPAS 

NEXPAl 

NXOEV 

NXDEVl 

PACR 

PATDAT 

PIHR 

PIRQ 

PIRQVE 



015500 
104000 



ERRVEC - 000004 



017550 
****** 



104406 

000011 
001000 
001572 
001566 
000020 
001576 
001574 
000400 
017544 
017550 
000012 
000200 
000240 
000254 
000244 

000250 



000240 
002100 
002104 
015002 
015006 
000500 
015502 
000260 
177772 
000240 



15 
15 
15 
15 



REFERENCES 

12-aiO 
15-1560 
«16-2129 
•a -425 
12-694 
12-775 
15-894 
15-987 
1084 
1174 
1255 
1558 
15-1579 
15-1702 
15-1827 
15-1956 
•8-425 
*17-2179 
12-548 
8-462 
17-2184 

17- 2184 
12-581 

•8 425 
•8-428 
•11-557 
♦11-555 
•8-425 
•11-559 
•11-558 

18- 2224 
15-1857 

•19-2284 
•8-425 
•8-448 
•8-449 
•8-455 
•8-455 

15-1415 
•5-454 

15-1544 

15-1878 
•8-452 

12-588 
•12-591 
•14-2011 

12-589 
•8-458 
•16-2152 
•8-459 
•8 425 
•8 425 



12 829 
15-1790 

12-615 

12-707 

12-779 

15-900 

15-995 

15-1094 

15-1179 

15-1260 

15-1580 

15-1584 

15-1710 

15-1842 

15-1975 

12-544 

•17-2179 

•18-2222 
8-462 
17-2184 
17-2184 

•17-2184 
17-2165 
12-662 

*15-1685 

*12-544 
*13-1686 

•18-2251 
15-1849 

17-2165 



15-1175 
15-1164 
15-1444 
15-1170 
15-1572 
15-1879 
15-1207 
•12-590 
12-594 

•14-2012 

15-1195 

15 1259 



12 849 

15-1921 

12 651 
12-715 
12-786 
15-907 
15-1017 
15-1100 
15-1200 
15-1267 
15-1400 
15-1609 
15-1717 
15-1854 
15 1981 
* 12 -544 



17-2184 
17-2184 



17-2165 
15-1966 
15-1704 

•12-544 
13-1689 



•18-2226 
17-2165 



15-1194 

15-1201 
15-1580 
15-1215 
15-1602 
15-1942 
15-1251 
14-2019 



14- 2018 

15- 1527 

15-1552 



PAGt 4 



CREf vol 



12 869 
15-1958 

12 658 
12-720 
12 792 
15-928 
15-1025 
15-1125 
15-1206 
15-1287 
15-1425 
15-1614 
15-1762 
15-1893 
15-1997 
•12-544 



17-2184 
17-2184 



•13-1722 
•13-1721 
•18-2231 



15-1219 
15-1258 
15-1610 
15-1256 
15-1657 
15-1949 
13 1294 



15 1655 



15-995 
•16 2160 

12 646 
12 726 
12-808 
15 955 
15-1029 
15-1129 
15-1212 
15-1295 
15-1452 
15-1644 
15-1770 
15 1901 
15-2005 
•12-605 



17-2184 
17 2184 



•18-2259 



15-1245 
15-1262 
15-1645 
15-1282 
13-1698 

13-1651 



15-1047 



12-653 

12-739 

12-827 

15-941 

15-1059 

15-1155 

15-1217 

15-1299 

15-1477 

15-1650 

15-1776 

13 1907 

12-616 



17-2184 
1^ 2184 



15-1500 
15-1288 
15-1715 
13-1306 
13-1M7 



15-1102 



12-667 

12-746 

12-847 

15 964 

15-1045 

15-1145 

15-1225 

15-1504 

15-1499 

15-1656 

15 1782 

IS 1913 

•12-016 



17-2184 
17-2184 



15-1526 
15-1551 

15-1472 
13-1748 



15 1155 



12-674 
12 754 

12 867 

15-971 

15-1071 

15-llt.t 

15-1244 

15-1510 

15-1525 

15-1661 

15 1786 

13 1919 



17-2184 
172184 



15-1659 
15-1575 

15-1493 
13 1832 



15 ;355 



12 687 
12 • 761 
15-888 
15-977 
15 1078 
15 1168 
15-1250 
15-1555 
15 1552 
15 1694 
15-1821 
15-1947 



17-21/9 •17-2179 



17-2184 
17-2184 



&5-1594 

15-1515 
15- 1645 



CVORCC 



CMFATIO Bt MACRC ON 0£C «^ A' 0<»:S6 



SfMBOL CROSS neFCRENCE 
<Yr«OI VALUE 



CREF vol 



PRO 

PRl 

PR2 

PR5 

PR4 

PR5 

PR6 

PR • 

PS 

PSU 

PVMA 

PURHSG 

PURVEC 

ROCHR 

RDtIN 

ROY 

RESVEC 

R6 

R7 

SCOPE 



000000 
000040 
000100 
000140 
000200 
000240 
000300 
000S40 
177776 
177776 
0O0S4O 
016614 
000024 
104410 
104411 
100000 

OOOOlO 
«000006 
•000007 

000004 



SIMR 


■ 


000060 


SIRR 


■ 


000120 


ssinR 


■ 


000070 


SSIRR 




OOOISO 


STACK 


■ 


001100 


START 




001402 


STARTl 




0020S4 


STKLMT 


■ 


177774 


SUR 




001140 


SURCK 




015224 


SUREG 




000176 


SUO 




000001 


SUOO 




000001 


SUOl 




000002 


SUO? 




000004 


SUOS 




000010 


SU04 




000020 


SUOS 




000040 


SU06 




000100 


SUO 7 




000200 


suoe 




000400 


SU09 




001000 


SUl 




000002 


SUlO 




002000 


SUll 




004000 


SU12 




010000 



REFERENCES 

*8-425 
•e 423 
♦8-423 
«8 423 
«8 423 
*8 423 
•8 423 
♦8-423 
♦8-423 
♦8-423 
♦8 460 

17 2181 
♦8-423 

17-2180 
♦17-2184 
♦8-426 

12-781 
♦8-423 
♦8-423 
♦8-423 
♦8-423 

12- 813 

13- 1156 
131436 
13-1733 

♦8-436 
♦8-441 
♦8-437 
♦8-442 
♦8-423 

8-462 

12-580 
♦8-423 
♦10-473 

17-2179 

17-2169 
♦8-462 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 
♦8-423 



12 598 
8 423 



♦17-2182 

•12-544 

♦17-2184 

12-625 
15-958 

•12-544 

12-602 

12- 833 

13- 1186 
13-1464 
13-1794 
13-1396 
13-1473 
13-1445 
13-1545 
12-595 

♦12-544 
♦12-582 

12-544 
17-2179 
♦17-2174 
12-544 

8-423 
8-423 
8-423 
8-423 
8-423 
8-423 
8-423 
8-423 
8-423 
8-423 



•12-544 



12-640 
13 1013 

•12-544 

12-618 

12- 853 

13- 1230 
13-1485 
13-1864 
13-1418 
13-1494 
13-1685 
13-1686 



14-2020 

•12-544 

17-2179 

17-2180 



17-2181 


•17-2181 


•17 


2181 


• W 


-2181 


• 17. 


2181 


• 17 


2181 


12-688 


12-702 


12 


■715 


12 


-/35 


12 


■ 748 


12 


^68 


13-1065 


15 1119 


















12-544 




















12-655 


12-676 


12 


-697 


12 


-728 


12 


-765 


12 


-794 


13-874 


13-909 


15 


-944 


15 


-999 


15 


•1051 


15 


-1105 


13-1274 


13-1318 


15 


-1345 


13 


-1568 


13 


■1587 


13 


-140^ 


13-1506 


13-1535 


15 


-1564 


15 


-1591 


15 


1626 


15 


-1672 


13-1926 


13-1962 


15 


-1984 














15-1574 


15-1604 


















15-1518 


15-1575 


15 


-1605 


15 


-1657 











17-2181 

12-544 

17-2179 

17-2180 



•12-544 

17-2179 



•12 544 

17-2180 



17 2169 
17-2180 



17-2169 
17-2181 



17 2169 
17 2181 
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CROSS RfcrERENCfc 








StMBOL 


VALUE 


Rf^ERCNCES 






SUIS 


• 0^0000 


#8-423 






SU14 


- 040000 


#6-423 






SU15 


• 100000 


#6-423 






SU2 


• 000004 


#8-423 






SWS 


• 000010 


#8-423 






SIM 


• 000020 


#8-423 






SWS 


• 000040 


#8-423 






SU6 


■ 000100 


#8-423 






SW7 


• 000200 


#8-423 






sue 


• 000400 


#8-423 






SW9 


« 001000 


#8-423 






TBITVE 


• 000014 


#8 423 






TITLED 


016726 


12-575 


#17 


-2189 


TKVEC 


> 000060 


#8-423 






TLCABL 


016773 


12-576 


#17 


-2190 


TPVEC 


• 000064 


#8-423 






THAPVE 


■ 000034 


#8-423 


«12 


-544 


TRTVEC 


• 000014 


#8-423 






TSTNUH 


001362 


#11-533 


• 17 


2174 


TSTl 


002142 


#12-602 






TSTIO 


003326 


12-791 


#12 


-794 


TSTll 


003422 


#12-813 






TST12 


003516 


#12-833 






TST15 


003612 


#12-853 






TST14 


003706 


#13-874 






TST15 


004056 


13-906 


#13 


-909 


TST16 


004224 


13-940 


#13 


-944 


TST17 


004524 


#13-999 






TST2 


002220 


#12-618 






TST20 


005012 


#13-1051 






TST21 


005312 


#13-1105 






TST22 


005600 


#13-1156 






TST2S 


005734 


13-1181 


#13 


-1186 


TST24 


006144 


13-1225 


#13 


-1230 


TST25 


006350 


13-1269 


#13 


-1274 


TST26 


006554 


13-1312 


#13 


-1318 


TST27 


006672 


13-1338 


#13 


-1343 


TST3 


002412 


12-652 


#12 


-655 


TSTSO 


007010 


13-1363 


#13 


-1368 


TST51 


007102 


13-1382 


#13 


-1387 


TSTS2 


007202 


13-1402 


#13 


•1407 


TST55 


007330 


13-1430 


#13 


-1436 


TST34 


007456 


13-1459 


#13 


-1464 


TSTS5 


007556 


13-1479 


•13 


-1485 


TST56 


007660 


13-1501 


#13 


-1506 


TSTS7 


010012 


13-1530 


#13 


-1535 


TST4 


002522 


12-673 


#12-676 


TST40 


010144 


13-1559 


#13 


-1564 


TST41 


010270 


13-1586 


#13 


•1591 


TST42 


010444 


13-1621 


#13 


-1626 


TST43 


010652 


13-1663 


•13 


-1672 


isr44 


011172 


13-1727 


#13 


-1733 



CREF vol 



•12-544 
17-2203 



17 2204 



CVORCC 



CM^AILO Bv MACRO ON ^'OLC 65 ri^ 09:S6 



3TMB0L CROSS RIFERENCF 
STfVOL VALUE 



CREF vol 



Of 



TST45 
tST46 
TST47 

TST5 

TST50 

TST51 

TST6 

TST/ 

TTPOS 



TTPOC 

TYPON 

TYPOS 

XXOP 

lAPTHO 

lASTAT 

lATYC 

lATYl 

IATY3 

IATr4 

lAUTOe 

•BASE 

IBOAOR 



IBOOAT 

ICOHl 

ICHARC 

ICKSUR 

tCHTAG 

<cns 

ICNTLG 
<CNTLU 
ICPUQP 
•CRLF 

«OeLK 

lOEVCT 

lOEVn 

lOOAGN 

lOTBL 

lENOAO 

lENOCT 



OllSOO 
012050 
012536 
002620 
012546 
012664 
002766 
005160 

• 104405 

• 104401 



• 104402 

- 104404 

- 104403 
001570 
001000 

■ «****« 
014154 
014150 
014156 
014146 
001154 
001244 
001122 



001126 
001250 
014124 
015656 
001100 
000000 
016413 
016406 
001216 
001165 

015040 
001200 
001246 
013140 
015030 
015150 
015076 



REFERENCFS 

♦15-1794 
15-1656 

«15-1926 
12-695 

•15 1962 
15-1960 
12-725 
12-760 
14 -2020 
12 575 
17-2176 
17 2160 
17-2178 

♦17-2184 

♦17-2184 

♦11-556 
9-472 
17-2166 
17-2166 

♦17-2166 
17-2165 

♦17-2166 

♦10-475 

♦10-475 

♦10-475 

♦12-714 

*12-859 

*15-956 

* 15 -1052 

•15-1150 

*15-1575 

*15-1598 

•15-1822 

*13-1990 

♦10-473 

♦10-473 

* 17 -2165 

♦17-2180 

♦10-473 

♦10-473 
17-2180 
17-2180 

♦10-475 

♦10-475 
17-2178 
17-2168 

♦10-475 

♦10-475 
14-2020 
17-2168 
9-467 

♦14-2020 



♦15-1864 

♦12 697 

♦15-1984 
♦12-728 
♦12-765 
♦17-2184 

12-576 
17-2178 
17-2180 
17-2178 



* 12 -562 
♦9-472 

17-2166 
♦17-2166 

♦17-2166 
17-2169 
*12-566 
12-555 
*12-608 
♦12-752 
♦12-859 
♦15-952 
♦13-1040 
♦13-1158 
♦13-1592 
♦15-1654 
♦13-1831 
♦13-1998 
12-596 

♦17-2165 
17-2184 
12-544 
10-475 
♦17-2180 
♦17-2180 

17-2165 
17-2178 
17-2168 
•12-597 
12-585 
14-2020 
♦17-2168 
♦14-2020 



14-2020 
17-2178 
17-2160 
17-2180 



12-575 



17-2165 
17-2180 
♦17-2168 



♦14-2020 



14-2020 
17-2178 
17-2180 
♦17-2184 



17 2165 
17 2178 
17-2180 



17-2167 
17-2178 
17-2180 



17-2168 
17-2180 
17 2181 



17 2169 
17-2180 
•17 2184 



U-2178 
l' 2160 



12-571 


12-579 


17-2180 


17 


-2180 


17 


-2180 










♦12-555 


12-585 




















♦12-625 


♦12-632 


♦12-639 


♦12 


-660 


♦ 12 


-679 


♦12- 


701 


♦ 12 


708 


♦12-740 


♦12-747 


♦12-767 


♦ 12 


■ 774 


♦12 


-780 


♦12- 


800 


♦ 12 


819 


♦15-882 


♦13-689 


♦13-895 


♦13 


-901 


♦13 


■917 


♦13- 


925 


• 15- 


929 


♦15-966 


♦13-972 


♦13-980 


♦15 


-988 


♦15 


■1007 


♦13- 


1019 


♦13- 


■1024 


♦15-1059 


♦13-1073 


♦13-1079 


♦13 


-1087 


♦15 


-1095 


♦13- 


1113 


♦ 13 


1125 


♦15-1146 


♦13-1162 


♦13-1192 


♦13 


-1236 


♦ 13 


-1280 


♦ 15- 


1325 


♦ 13 


■1550 


♦13-1413 


♦13-1442 


♦13-1470 


♦ 13 


■1491 


♦ 13 


-1513 


♦15- 


1542 


♦ 15 


■1570 


♦13-1687 


♦13-1696 


♦13-1705 


♦15 


-1711 


♦15 


■1757 


♦15- 


1765 


•15 


1816 


♦15-1844 


♦15-1888 


♦13-1894 


♦13 


-1941 


♦ 13 


-1948 


♦15- 


1968 


• 15 


-1977 


17-2203 


17-2204 




















15-2030 


17-2203 


17-2204 


















17-2165 


♦17-2165 


•17-2165 


















17-2184 






















12-544 


12-544 


12-544 


12 


•544 


12 


-544 











17-2165 
17-2180 



17-2169 
17-2180 



17-2169 



17-2169 



17-2178 



17-2178 



CVOPCC 


CRFATfcD Bt 


MACRO ON 27 DEC 63 AT 


09: S6 


PAGE 8 


StMBOL 


CROSS REFERENCE 








CREF VOl 




VALUE 


REFERENCES 








lENOHG 


015147 


14-2020 


#14 2020 






lENULL 


013144 


14-2020 


#14-2020 






IcNV 


0O1210 


♦10-473 


12-564 


1 r clOD 


IT O 1 


•ENVM 


001211 


♦10 473 


12 544 


17 21o5 


IT 01 AQ 




013042 


14-2014 


AAA 

♦14 -2020 






lEOPCT 


013070 


♦14*2020 


14 -2020 






lERf- LG 


001103 


♦10-473 


♦17-2169 


1 / ^lo^ 


17 0 1 A A 

1 f -clo9 






17-2179 








A Cr AM A W 

lEHflAX 


001115 


♦10-473 


♦12-544 


1 T TO 


A 1 T 0 1 T A 
♦ 1 f - <; 1 f 9 


1 ERROR 


/\ « 0\CA 

015050 


12-544 


♦17-2169 






•ERRPC 


001116 


♦10-473 


♦17-2169 


A 4 T ^4 XA 

♦17-2169 


4 "7 ^4 X A 

1 / -21o9 


ierntb 


001252 


♦11-473 


17-2178 






• ERRT T 


015242 


17-2175 


♦17-2178 






•ERTTL 


001112 


♦10-473 


♦17-2169 




IT O 1 A A 

1 f -cl09 




001162 


♦10-473 


♦12-544 




IT 0 1 JLO 


A f T A Al 

lETABL 


001210 


♦10-473 








IE TEND 


/\y\4 ^ito 

001252 


9-472 


♦10-473 






*^ A T Al 


/W\4 4 7^ 

001172 


♦10-473 


♦12-545 


♦I f -cloo 




• FFLG 


A 4 A V 7 A 

014374 


♦17-2166 


♦17-2166 


1 f -dlo6 


A 1 T 0 1 A A 

♦I f -clOO 




001156 


♦10-473 


17-2165 


IT Of 


1 T 01 

1 r -clod 


Air Ti i f 

•FILLS 


001155 


♦10-473 


17-2165 


17-2165 




•FREE 


_ AAA4 AA 

• 000104 


♦19-2278 


19-2279 






a ^A A^A 

vuDAUR 


AA4 t <^A 

001120 


♦10-473 


17-2204 






1 COO AT 


AA4 4 '^A 

001124 


♦10-473 


♦12-603 


♦12-625 


4 O A OA 

12-629 






12-651 


♦12-661 


12-665 


^ 4 O A 

♦12-668 






♦12-702 


12-705 


^ 4 ^ TAA 

♦12- 709 


1 O T1 1 

12- f 11 






12-737 


♦12-741 


4 ^ 7AA 

12 744 


A 1 O T A A 

♦12-748 






♦12-775 


12-777 


♦12-781 


4 O TAA 

12-784 






12-825 


♦12-841 


12-845 


A 1 O AA. 4 

♦12-861 






♦13-896 


13-898 


♦13-902 


1 V AAft 

13-905 






13-933 


♦13-937 


15-93^ 


a1 V 

♦ld-930 






♦13-978 


13-981 


13-905 


A 1 V AAA 

♦13-989 






♦13-1025 


13-1027 


♦13-IU30 


IV 1 AV V 






♦13-1072 


13-1076 


♦13-lOOQ 


1 V 1 AAO 

ld-lvo2 






♦13-1119 


13-1121 


♦13-112# 


IV 11 OT 

la-llcf 






♦13-1147 


13-1149 


♦Id-llOd 


IV 11 AA 

lo-lloo 






13-1196 


♦13-1202 


IV 1 ^AA 

13-1204 


a1 V 1 OAA 

♦15-lcOo 






13-1242 


♦13-1246 


IV 1 OA A 

13-1248 


IV 1 0i^V 

13-1253 






♦13-1289 


13-1291 


A 1 V 1 OOlK 

♦13-1295 


IV 1 OAT 

13-1297 






13-1356 


♦13-1374 


IV 1 VTA 

13-1378 


A 1 V 1 VAV 

♦13-1393 






♦13-1471 


13-1475 


A 1 V 1 A AO 

♦13-1492 


IV 1 A AT 

13-1497 






13-1577 


13-1582 


A f V 1 XA4 

♦13-1601 


IV 1 A/\T 






♦13-1652 


13-1654 


4 V 1 ASA 

13-1659 


A 1 V 1 AAA 

♦15- IbOo 






13-1708 


♦13-1712 


IV 1 T 1 C 

15-1 f 15 


A 1 V 1 TCA 

♦13-1750 






♦13-1772 


• V • ^ ^A 

13-1774 


4 V 4 TTA 

♦13-1 r 76 


IV 1 TAA 

15-1 f OO 






♦13-1833 


• « 4 A VC 

13-1835 


A 4 V 4 A VA 

♦13-1639 


IV 1 AAA 

15- 16#0 






13-1891 


^ • V 4 AAK 

♦15-1895 


A 1 V 1 AAA. 

♦15- 1690 


A 1 V 1 AAT 

♦15-169^ 






♦la-l^lj 




A 1 V 1 AA V 

♦10-1943 


IV 1 AAg 

15 19^D 






15-1975 


♦13-1976 


IV 1 ATA 

13-1979 


A 1 V 1 AAl 

♦15-1991 






172204 








•GET42 


013120 


«14-2020 








IGTSUR 


015726 


n7-2160 


172184 


17-2184 





SCO OCTH 



17 


2166 


17 


2169 












IT 


2166 
















17 


2179 


17- 


2179 


1/ 


2179 


♦17-2179 


17. 


2179 


17- 


2179 


17- 


2179 












17- 


2169 


17- 


2169 


17- 


2178 


17-2203 


17- 


2204 


1 7. 


cxo ' 


17- 

X f " 


.01 AA 


Al 7 - 
• X ' 


PI 7Q 








A1 7 . 

f • 


'CXOO 
















Aid 
♦ ic 




1 o , 
Xc ' 




a1 O . 
• Xc • 


.AAA 


1 p. AAA 
xc -o^^ 


Al P 
•Xt 


.AA7 


ic ' 




a1 9 . 
*Xc • 


.AAA 


1 o . 
Xc 




A IP. AAA 


IP 
xc 


.AQP 


Aid. 
•It ' 


.71 ^ 

" 9 XO 


ID, 
Xc ' 


.71 A 
- r XO 


Aid. 


-7P1 


IP- 7PA 


Al P 
• Xc 


. 7XX 

• ' 00 


Ic ' 




a1 O, 
♦ Xc ' 




1 o. 

Xc ' 




A1P.7AA 
AXc - ' PO 


IP. 
Xtf ' 


-771 


a1 O 


-7A7 


IP 
xc 


.7QO 

- f TV 


Al p. 
•Xt 


-AAP 

'Owe 


IP.AAA 


*1P 
• xc 


-API 

OCX 






Al X 


.AAX 


1 X 

X<9 


-AAA 


aIX.AM 


IX 

XO 


-AQP 


a1 % 


-Ql A 

-TrXO 


1 V 

Xd 


" 7cx 


Al X 

• X^ 




1 X.QPA 

XO - 7CO 


a1 X. 

•XO' 


.QXA 
■ ^ov 


1 V 




Al \ 

• xo 




1 X 

XO 




a1 X.Q7X 


1 X 

XO 


" 7 f 0 


1 V 




a1 X 


.1A1 X 
* XVX^ 


IX. 
XO' 


>1 A1S 


a1 X-1 Al A 
•XO -xwxo 


1 X 

XO 


. 1AP1 
* xvcx 


1 V 

xo 


.1 AX7 
• XvO f 


Al % 

•xo 


-lAAl 
- XV^X 


1 X. 
XO' 


.1 AAX 
■ XV^O 


A 1 X . 1 AA^ 
•XO- XV03 


1 X 

X 0 


. 1 AAQ 


a1 X 

•xo 


- Xw03 


1 V 

xo 


. 1 AAA 


1 X 

XO 


.1AOP 


a1 X.I AM 
•XO - XVtO 


1 X 

XO 


. 1 AQA 


a1 X 

•xo 


.11 XI 
- XX^X 


1 V 

x^ 


.1 1 XX 
* xx^^ 


a1 X 
•XO 


.1 1 XA 
* XXOv 


1 X . 1 1 XQ 

XO - XX07 


IX 

XO 


• 1 lAX 

• X x^o 


a1 X 
•XO 


.11 AO 
- X XD7 


1 V 

Xd 


• 11 70 

* XX 9 c 


1 V 

XO 


.1 1 77 
* X X r r 


Al X.I 1QX 
•XO- XX7O 


1 X 

XO 


. 1 1QA 

XXtO 


1 V 

xo 


. 1 PI A 
- XcXV 


1 V 

xo 


. 1 d1^ 

- XcX3 


1 X 

XO 


. 1 PP1 
* Xcc X 


a1 X.1PX7 
• XO - xco * 


IX 

XO 


. 1PAA 


13 


-1258 


♦ 13 


-1263 


13 


-1265 


♦13-1281 


13 


-12SS 


13 


-1302 


13 


-1308 


♦13 


-1328 


13-1331 


♦ 13 


-ISSS 


13 


-1398 


♦13 


-1417 


13 


-1421 


♦13-1446 


13 


-1450 


♦13 


-1517 


13 


-1521 


♦13 


-1546 


13-1550 


♦ 13 


-1571 


13 


-1612 


♦ 13 


-1640 


13 


-1642 


♦13-1646 


13 


-1646 


IS 


-1692 


♦ 13 


-1695 


♦13 


-1697 


13-1700 


♦ 13 


-1705 


13 


-1760 


♦13 


-1764 


♦13 


-1765 


♦13-1766 


13 


-1760 


♦13 


-1784 


13 


-1786 


♦13 


-1815 


13-1819 


13 


-1025 


♦13 


-1843 


13 


-1847 


♦13 


-1851 


13-1852 


♦ 13 


-1009 


13 


-1899 


♦ 13 


-1903 


13 


-1905 


♦13-1909 


13 


-1911 


♦13 


-1950 


♦ 15 


-1951 


♦ 13 


-1952 


13-1954 


♦ 13 


-1969 


13 


-1995 


♦ 13 


-1999 


13 


-2001 


♦15-2035 


17 


-2203 



CwOR:C :Sf4TtD S» HACW) on 2" MC as A» 0«»:S6 PAGt 9 



-'MBOi VALUE iVfFEnCNCES 





• ooooos 


6-414 


6-414 


8 414 






iMiers 


001000 


•9-472 












IICNT 


OT/UOA 


•10-475 


•17-2179 


17 


2179 


• 17 


2179 


(III UP 


016606 


17 2181 


17-2181 


•17 


2181 






(INT AC 


001155 


•10-475 


17-2180 


17 


-2180 


17 


2180 


(ITE»« 


001114 


•10-475 


•17-2169 


17 


■2169 


17. 


2169 


ur 


001166 


•10-475 


17-2165 


17 


2165 


17 


2169 


ilFlG 


01457S 


•17-2166 


•17-2166 










ilpaoa 


001106 


•10-475 


•12-544 


• 17. 


■2179 


• 17. 


2179 


ILPCRtt 


001110 


•10 475 


•12-544 


• 12 


797 


• 12 


-816 






•15 lloe 


•15-1521 


• 15 


-1546 


• 15 


1410 






•15-1670 


•15-1929 


17 


■2169 


17 


2179 


tMAOftl 


001222 


•10-475 














001226 


•10-475 














0012S2 


•10-475 












IMAORA 


0012S6 


•10-475 














001170 


9-472 


9-472 


•10-475 


12 


544 


<HAHS1 


001220 


•10-475 












•nAns2 


001224 


•10-473 












inAHSS 


0012S0 


•10-475 












IfMMSA 


0012S4 


•10-475 














001002 


•9-472 












i»rLC 


014S72 


•17-2166 


17-2166 


• 17 


-2166 


•17 


■2166 




016451 


17-2180 


•17-2180 










IHSGAO 


001204 


•10-475 


•17-2166 


17 


-2166 






IHSGLG 


001206 


•10-475 


•17-2166 










•HSCTY 


001170 


•10-475 


•12-546 


17 


-2166 


• 17 


-2166 


•HSUR 


016420 


17.2180 


•17-2180 










•mrPi 


001221 


•10-475 












•HTyP2 


001225 


•10-475 












•MTtPS 


001251 


•10-475 












•MTTP4 


001255 


•10-475 












inxcNT 


015654 


17-2179 


17-2179 


17 


-2179 


•17 


-2179 


•NULL 


001154 


•10-475 


17-2165 


17 


-2165 


17 


-2165 


INUTSr 


' 000001 


•12-602 


12-602 


•12 


-602 


•12 


-618 






•12-676 


12-676 


•12 


-676 


•12-697 






•12-765 


12-765 


•12 


-765 


•12 


-794 






•12-855 


12-855 


•12 


-855 


•12 


-855 






•15-909 


15-909 


•15 


-909 


•15 


-944 






•15-1051 


15-1051 


•15 


-1051 


•15 


•1105 






•15-1186 


15-1186 


•15 


-1186 


•15 


-1250 






•15-1518 


15-1518 


•15 


-1518 


•15 


-1545 






•15-1387 


15-1587 


•15 


-1587 


•15 


-1407 






•15-1464 


15-1464 


•15 


-1464 


•15 


-1485 






•15-1555 


15-1555 


•15 


-1555 


•15 


-1564 






•15-1626 


15-1626 


•15 


-1626 


•15 


-1672 






•15-1794 


15-1794 


•15 


-1794 


•15 


•1864 






•15-1962 


15-1962 


•15 


-1962 


•15 


•1984 


•OCNT 


014620 


•17-2167 


•17-2167 


•17 


-2167 






I9100E 


014622 


•17-2167 


•17-2167 


17 


-2167 


• 17 


•2167 


•OVER 


015640 


17-2179 


17-2179 


17 


-2179 


17 


•2179 


•PASS 


001176 


•10-475 


•12-544 


• 14 


-2020 


• 14 


•2020 



17-^179 


17 2179 












17-2169 


17-2176 












17 2169 


17-2160 


ir 2160 


17- 


2160 






17-2179 


17 2179 


17-2179 










•12-656 


•12-656 


•15-947 


•15- 


1002 


• IS- 


1054 


•IS 14S9 




•15- 1556 


• 15- 

• * ^ 


1594 


• IS- 


1?S9 


•17-2179 


17-2179 


17-2179 










17-2165 


17-2169 


17-2179 










17-2166 


•17-2166 












12-618 


•12-616 


•12-655 


12 


-655 


•12 


-655 


12-697 


•12-697 


•12-728 


12 


-728 


•12 


-726 


12-794 


•12-794 


•12-815 


12 


-613 


•12 


■615 


12-653 


•12-655 


•13-874 


15-674 


•15 


-674 


15-944 


•15-944 


•15-999 


15 


-999 


•15 


■999 


15-1105 


•15-1105 


•15-1156 


15 


-1156 


•13 


■1156 


13-1250 


•15-1230 


•15-1274 


15 


-1274 


•15 


•1274 


13-1545 


•13-1545 


•15-1566 


13 


-1566 


•15 


-1566 


15-1407 


•15-1407 


•15-1456 


15 


-1456 


•15 


-1456 


15-1485 


•15-1465 


•15-1506 


15 


-1506 


•15 


1506 


15-1564 


•15-1564 


•15-1591 


15 


-1591 


•15 


■1591 


15-1672 


•15-1672 


•15-1755 


15 


-1755 


•15 


■1755 


15-1864 


•15-1864 


•15-1926 


13 


-1926 


•15 


-1926 


15-1984 


•15-1984 












•17-2167 


•17-2167 












•17-2179 














14-2020 


14 2020 


14-2020 


17 


-2179 


17 


■2179 



Cvottcc cdfiirco Sf HACfto oh olc as at oq.s<» pag( lo 
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12-602 
12-726 

12- 653 
13 1051 

13- 1274 
13-1407 
13-1535 
13-1733 
131964 
17-2173 



12- 615 
15-1186 

13- 1485 
13-1926 

17-2184 



CVOBCC CMtATtD B> MACRO ON 27 DEC «5 AT M-.V* PAGE IS 



MACRO CROSS REFERENCE 



CREF vol 



MACRO NAME 



REFERENCES 



•ISKIP 


«8'425 


12*652 




IS- 1225 


IS- 1269 




lS-1501 


13-15SO 


.E(X»AT 


#6 '406 


8-42S 


.HEAOE 


«8*407 


8-414 


.SETUP 


#8-407 


12*542 


.SURHI 


#8-408 


8-422 


. SWRLO 


#8-422 




.lACTl 


#8-410 


9-467 


. lAPTB 


#8-410 


#10-47S 


. lAPTM 


#8-410 


9-472 


. lAPTt 


#8-410 


17-2166 


.ICATC 


#8-408 


8-462 


, ICMTA 


#8-408 


9-47S 


. lEOP 


#8-409 


14-2020 


. lERRO 


#8-409 


17-2169 


. lERRT 


#8-409 


17-2178 


.IPOUE 


#8-408 


17-2181 


,IRD0C 


#8-407 




. IREAO 


#8*409 


17-2180 


.•SCOP 


#8-409 


17-2179 


. I TRAP 


#8-407 


17-2184 


.♦TYPO 


#8-409 


172168 


.ITYPE 


#8-409 


17-2165 


.ITYPO 


#8-408 


17-2167 



12-675 
IS 1S12 
15 1559 



12 b9S 
15-1558 
15 1586 



12-725 
15-1565 
15 1621 



10-475 



'.E J V -J ' 



12-760 12-791 15-906 H-9*0 ;5ll9l 

15-1582 15-1402 151450 151459 15 1479 
15 1665 151727 15-1656 15 1990 



